Question

Написать программу в паскале, которая выведет все числа в диапазоне от a до b

Answer 1

//от а до б, включая границы

var a, b, i : integer;

begin

writeln('Введите числа а и б (б>=a)');

readln(a,b);

for i := a to b do

write(i,' ');

end.