Вывести массив из 20 случайных элиментов от 0 до 200

Question

Вывести массив из 20 случайных элиментов от 0 до 200

Answer 1

Var
i:integer;
mas:array[1..n] of integer;
begin
for i:=1 to 20 do
mas[i]:=random(200);
for i:=1 to 20 do
write(mas[i]:4);
end.