Программа на языке Pascal:

program RangeExample;
var
a, b, i: integer;
begin
write('Введите начало диапазона: ');
readln(a);
write('Введите конец диапазона: ');
readln(b);
writeln('Диапазон от ', a, ' до ', b, ':');
for i := a to b do
begin
writeln(i);
end;
end.

Эта программа запрашивает у пользователя начальное и конечное значения диапазона, а затем выводит все числа в этом диапазоне от начального до конечного значения.