Question

помогите пожалуйста.

Answer 1

var array1: array [1..N] of real;

i: integer;

begin

randomize;

for i:=1 to N do begin

array1[i]:= random(-lim, lim) * 2;

writeln(array1[i]);

end

end.