Помогите с паскалем: описать числовой массив ** 5 элементов и заполнить его...

Question

Помогите с паскалем: описать числовой массив на 5 элементов и
заполнить его присваиванием любыми числами,
распечатать содержимое элементов массива

Answer 1

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.

Comments

Спасибо))