ПОМОГИТЕ ПОЖАЛУЙСТА! ДАЮ 20 БАЛЛОВ
Запишите в текстовое поле программу заполнения массива (5 элементов) случайными числами в интервале [-20,20] и вывода его на экран в строку.

Пример:

Массив:

-1 -20 3 14 5
ПАСКАЛЬ.

Ответ:

program Chernovik;

var a:array [1..5] of integer;

i:integer;

begin

randomize;

writeln('Массив:');

for i:=1 to 5 do

begin

a[i]:=random(41)-20;

write(a[i],' ')

end

end.

Объяснение:

В цикле со счётчиком:

1) присваиваем значение элемента массива

2) выводим значение элемента на экран