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

Question

Гость

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

Гость

var a: array[1..12] of real; 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.

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.