Сформулировать и вывести ** экран последовательности из N элементов датчиком случайных...

0 голосов
163 просмотров

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


Информатика (31 баллов) | 163 просмотров
Дано ответов: 2
0 голосов
Правильный ответ

// 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

(142k баллов)
0 голосов

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.

(202 баллов)