Сформулировать и вывести на экран последовательности из N элементов датчиком случайных чисел из промежутка (- 23; 34)
Var
a : array [1..1000] of longint;
i,n : longint;
begin
readln(n);
for i:=1 to n do a[i]:=random(58)-23;
for i:=1 to n do writeln(a[i]);
end.
Оцени ответ
