Напишите программу ** языке програмирования Паскаль создания массива и вывода элементов...

Question

Напишите программу на языке програмирования Паскаль создания массива и вывода элементов массива на экран,состоящего из 5 элементов,заполненных случайным образом,срочно плз

Answer 1

Var
mas:array [1..5] of integer;
i:integer;
begin
Randomize();
for i:=1 to 5 do
mas[i]:=random(21)+1;
for i:=1 to 5 do
write(' ',mas[i]);
end.

Заполняет массив случайными числами в диапазоне от 1 до 20, потом выводит через пробел элементы массива в одну строку.