Сформулировать и вывести на экран последовательности из N элементов датчиком случайных чисел из промежутка (- 23; 34)
Сформулировать и вывести на экран последовательности из 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.
// 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
Не нашли ответ?
Похожие вопросы