Напишите программу, которая вводит натуральное число N и выводит на экран N псевдослучайных чисел.

vari,n:integer;begin     readln(N); {вводим N}     For i:=1 to n do            write(Random(100),' '); {выводим псевдослучайные числа в диапазоне [0; 100) }end.