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

Question

Гость

Ответ(ы) на вопрос:

Accepted Answer

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.