Jak używać junkcji radom i radomize?


(Moore96) #1

Witam.Piszę program i chciał bym napisąć by miał np. 5 zagadek.Program ma wylosować jedną z nich i ja wypisać.Główny szkielet już mam problem z tym radom i radomize.Pomóżcie jak mam to zrobic by wybierał jedna z zagadek.I te zagadki napisać jako procedury?


(Chablak) #2

Zagadki najlepiej odczytywać z pliku.

A co do random i randomize to robisz tak

program losowo;

uses

crt;


begin

clrscr;

randomize;


write('Wylosowana liczba z zakresu od 0 do 10: ', random(10));


readkey;


end.

(Moore96) #3

wielkie dzięki


(Moore96) #4

Mam jeszcze pytanko a mianowicie jak mam w końcu zrobić by program wylosowywał zagadę?(sory nie umiem tego takiego kodu jak wy zrobić)

.......

randomize;

writeln(random(zag1..zag10));

................

albo

................

randomize;

writeln(random(zag10));

.............

albo jeszcze inaczej...


(Fiołek) #5
zagadki[0..10] of string; //Tak to się w Pascalu deklaruje? Jak nie, to jest to tablica 11-elementowa(0..10) stringów.


writeln(zagadki[random(10)]);

Jakoś tak to będzie.