Использования генератора случайных чисел — Pascal (Паскаль)

program rnd;
var
     i:integer;
begin
     Randomize;
     writeln('Случайные числа');
     for i:=1 to 10 do 
          writeln(Random(10));
end.