программа формирует массив из 10 случайных целых чисел из интервала от 10 до 80. Вывести на экран элементы массива в строку с разделителем пробел.

begin

for var i:=1 to 10 do

print(random(10,80));

end.

Вариант №2 (классический)

var i:integer;

begin

for i:=1 to 10 do

write((random(91)-10),' ');

end.

Вариант №3 (с массивом)

var i:integer;

a:array[1..10]of integer;

begin

for i:=1 to 10 do begin

a[i]:= random(91)-10;

write(a[i],' ');

end;

end.