Vazamdabs
5 год назад
Пожалуйста посчитайте с паскалем: описать числовой массив на 5 элементов и заполнить его присваиванием любыми числами, распечатать содержимое элементов массива
ОТВЕТЫ
Ангелина
Oct 24, 2020
PASCALABC.NET
var
a: array[1..5] of integer;
i : integer;
Begin
randomize;
For i:= 1 to 5 do
a[i]:= random(5000);
For i:= 1 to 5 do
write(a[i], ' ');
end.
var
a: array[1..5] of integer;
i : integer;
Begin
randomize;
For i:= 1 to 5 do
a[i]:= random(5000);
For i:= 1 to 5 do
write(a[i], ' ');
end.
367
Смежные вопросы:
