Составить алгоритм (программу), который для двух введенных чисел А и В выведет на экран все числа из указанного диапазона Паскаль !!

var a, b : integer;

begin

write('Введите число А: ');

readln(a);

write('Введите число Б: ');

readln(b);        // произошёл ввод данных

if a > b then for b to a do write (b, ' ')

           else for a to b do write (a, ' ');    // а вот и вывод, который тебе нужен

end.

При вводе одинаковых чисел программа выведет данное число