Паскаль.Массивы

Напишите программу, которая заполняет случайными числами (из диапазона от -10 до 20) массив A размерностью 15 и выводит его элементы на экран в одну строку.

var

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

  i:integer;

begin

  randomize;

  writeln(Сгенерированный массив:);

  for i := 1 to 12 do

  begin

    a[i] := random(31) - 10;

    write(a[i], );

  end;

  writeln;

end.

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку