Potrzebuje w pascalu zrobic za pomocą procedury losowanie w któreym program bedzie pytał ile liczb wylosowac np. 10 i je losuje\
daj naj
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
var
ilosc,i:,liczba : integer;
begin
Randomize;
write('Podaj ilosc liczb do wylosowania: ');
readln(ilosc);
for i := 1 to ilosc do
begin
liczba := random(500); // losuje liczbe z zakresu 0-499 (chyba)
write(liczba, ' ');
end;
end.
Nie mam na komputerze kompliatora, więc nie wiem na 100 % czy to zadziała. Jeśli coś nie tak - pisz wiadomość