Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

[QBasic] i komanda randomize

[es] :: Ostali programski jezici :: [QBasic] i komanda randomize

[ Pregleda: 4174 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

lonelyrider_44
Zrenjanin

Član broj: 42310
Poruke: 445
*.smin.sezampro.yu.



+20 Profil

icon [QBasic] i komanda randomize14.08.2006. u 16:34 - pre 214 meseci
OK, postoji u QBasic-u komanda randomize i radi, ali meni treba takva komanda koja ce recimo da izmesa 52 broja tako da se svaki posle toga pojavljuje... "Randomize timer" to ne radi...
 
Odgovor na temu

anon75319
freelancer
Varazdin(Hrvatska)

Član broj: 75319
Poruke: 239
*.adsl.net.t-com.hr.



Profil

icon Re: [QBasic] i komanda randomize12.09.2006. u 20:51 - pre 213 meseci
Nisam bas skuzio sto zelis ali mislim da zelis da ti se brojevi od 1-52 izmjesaju i da se to ponovi 52 puta i da se svaki put random broj ispise?
Ako je tako smjesti funkciju randomize u for petlju od 1 to 52 i to je to...

 
Odgovor na temu

thePOET

Član broj: 37493
Poruke: 40
*.dial.b92.net.



Profil

icon Re: [QBasic] i komanda randomize13.09.2006. u 16:06 - pre 213 meseci
Code:

DIM a(1 TO 52) AS INTEGER
DIM b(1 TO 52) AS INTEGER

CLS

FOR i = 1 TO 52
   a(i) = i
NEXT

RANDOMIZE TIMER

FOR i = 52 TO 1 STEP -1
   n = INT(RND * i) + 1
   b(i) = a(n)
   a(n) = a(i)
   PRINT b(i);
NEXT
 
Odgovor na temu

X Files
Vladimir Stefanovic
Pozarevac

SuperModerator
Član broj: 15100
Poruke: 4901
*.dynamic.sbb.rs.

Jabber: xfiles@elitesecurity.org


+638 Profil

icon Re: [QBasic] i komanda randomize23.04.2008. u 16:34 - pre 193 meseci
(23.04.2008. - 18:34) Tema je premeštena iz foruma Art of Programming u forum Ostali programski jezici.
 
Odgovor na temu

[es] :: Ostali programski jezici :: [QBasic] i komanda randomize

[ Pregleda: 4174 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.