randomize;
writeln(tab[random(10)]);
randomize wystarczy wywolac tylko raz w programie, jest to cos w rodzaju generatora liczb pseudolosowych.
Tylko, że on losuje z tablicy.
Czyli jak ma np. tablicę:
12 23 564 324 75 13
To chce, żeby mu wylosowało:
23 75 12 13 564 324
Jakąś przypadkową kolejność.
Może zrób tak:
Losuj spośród n liczb (Random(n))
Jeżeli wylosujesz np. 5 element tablicy do dodaj do zbioru 5
(Wylosowane := Wylosowane + [5], lub jeszcze lepiej do tablicy jakiejś tablicy, pod numer 5 znacznik, że wylosowano ten element)
i losuj spośród n-1 liczb (Random(n-1);
Następnie sprawdzasz jaki numer wylosowałeś i zwiększasz tą liczbę o liczbę elementów w zbiorze wylosowanych, ale mniejszych od tej liczby. Wówczas masz element w tablicy, jaki powinieneś wybrać. Itd.
--
Jest jeszcze jeden błąd ... :)
--------Oficjalny kanał----------
Service for programmers w IRC: #4programmers, warszawa.ircnet.pl (POLNet)