Анонимно

Напишите программу для вывода на экран 10 целых, случайных чисел в интервале [50,150). Обратите внимание на скобки!

Ответ

Анонимно
var i: byte;
begin
randomize;
for i := 1 to 10 do
  writeln(random(100)+50);
end.