Сформулировать и вывести на экран последовательности из n элементов датчиком случайных чисел из промежутка (- 23; 34)

// PascalABC.NET 3.0, сборка 1128
begin
  SeqRandom(ReadInteger('Количество элементов='),-23,34).Println
end.

Тестовое решение:
Количество элементов= 15
0 2 -7 -12 3 22 13 32 -14 -15 28 -17 10 34 -6

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.