Question

Напишите программу, которая вводит натуральные числа a , b и N , и выводит на экран N псевдослучайных целых чисел на отрезке [ a , b ] .

Входные данные
Входная строка содержит три числа, разделённые пробелами: границы отрезка a и b и требуемое количество чисел N . Гарантируется, что a ≤ b .

Выходные данные
Программа должна вывести N случайных целых чисел в одной строке, разделив их пробелами.

Примеры:
входные данные
10 20 5
выходные данные
10 10 19 12 13

!!! ЯЗЫК PascalABC !!!
!!! Без while, a через for !!!

Answer 1

var a,b,n,i: integer;

begin

write ('Введите границы отрезка: ');

readln (a,b);

write ('Введите требуемое количество чисел: ');

readln (n);

for i:=1 to n do write(random(b-a+1)+a,'   ')

end.