Сформулировать и вывести на экран последовательности из 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.