Напишите программу, которая вводит натуральные числа a , b и N , и выводит на экран N псевдослучайных целых чисел на отрезке [ a , b ] . Входные данные Входная строка содержит три числа, разделённые пробелами: границы отрезка a и b и требуемое количество чисел N . Гарантируется, что a ≤ b . Выходные данные Программа должна вывести N случайных целых чисел в одной строке, разделив их пробелами. Примеры: входные данные 10 20 5 выходные данные 10 10 19 12 13 !!! ЯЗЫК PascalABC !!! !!! Без while, a через for !!!
Program GenerateRandomNumbers; var a, b, N, i, randomNumber: integer; begin randomize; readln(a, b, N); for i := 1 to N do begin randomNumber := random(b - a + 1) + a; write(randomNumber, ' '); end; end.
var
a, b, N, i, randomNumber: integer;
begin
randomize;
readln(a, b, N);
for i := 1 to N do
begin
randomNumber := random(b - a + 1) + a;
write(randomNumber, ' ');
end;
end.