Вот так? Будет выводиться диапазон чисел, которые указал пользователь? Если нет - напишите под моим комментарием var i,a,b: integer; begin write('Введите два целых числа через пробел: '); readln(a,b); if a>=b then writeln('Ошибка!') else for i:=a to b do writeln(i); end.
Если нет - напишите под моим комментарием
var i,a,b: integer; begin write('Введите два целых числа через пробел: '); readln(a,b); if a>=b then writeln('Ошибка!') else for i:=a to b do writeln(i); end.