program RandomNumbersGenerator;
vari, randomNumber: integer;
beginrandomize;
writeln('Random numbers:');
for i := 1 to 10 dobeginrandomNumber := random(100);writeln(randomNumber);end;end.
program RandomNumbersGenerator;
var
i, randomNumber: integer;
begin
randomize;
writeln('Random numbers:');
for i := 1 to 10 do
begin
randomNumber := random(100);
writeln(randomNumber);
end;
end.