Запишите программу, в которой осуществляется: заполнение случайным образом целочисленного массива f, состоящего из 20 элементов, значения которых изменяются в диапазоне от 0 до 50; вывод массива f на экран. Выполнить программу на компьютере в среде программирования PascalABC.NET.
Answers & Comments
Ответ:
program A;
var
f: array[0..50] of integer;
i: integer;
begin
for i:=1 to 50 do
f[i]:=random(50);
for i:=1 to 50 do
write(f[i], ' ');
end.