Помогите, пожалуйста. Задача, которую нужно решить на Паскале методом until. Ввести число N и M, увеличить по +1 N до M циклом и вывести каждый шаг.
Var n,m: integer;
begin
readln(n,m);
repeat
n:=n+1;
writeln(n);
until n=m
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var n,m: integer;
begin
readln(n,m);
repeat
n:=n+1;
writeln(n);
until n=m
end.