Question

Организовать массив из 13 элементов, заполнить его числами и вывести на экран элементы массива в столбик.Паскаль!!!!​

Answer 1

Ответ:

var

a: array [1..13] of integer;

i:integer;

begin

 randomize;

 for i:= 1 to 13 do

     a[i]:= random (20);

 for i:= 1 to 13 do

     writeln (a[i]);

end.

Объяснение:

или вместо  

randomize;

 for i:= 1 to 13 do

     a[i]:= random (20);

можно и вручную только понадобиться добавить ещё одну переменную

for i:= 1 to 13 do

  read (k);