Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

Составьте программу, которая формирует массив из 12 случайных чисел принадлежащих промежутку -5;5, и выводит эти числа в столбец

Ответ оставил Гость

var

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

i:integer;

begin

randomize;

for i:=1 to 12 do a[i]:=random(11)-5;

for i:=1 to 12 do writeln(a[i]);

readln;

end.