Напишите программу, которая вводит натуральное число N и выводит на экран N псевдослучайных чисел.
Answers & Comments
mnv1962
Var i,n:integer; begin readln(N); {вводим N} For i:=1 to n do write(Random(100),' '); {выводим псевдослучайные числа в диапазоне [0; 100) } end.
Answers & Comments
i,n:integer;
begin
readln(N); {вводим N}
For i:=1 to n do
write(Random(100),' '); {выводим псевдослучайные числа в диапазоне [0; 100) }
end.