Помогите, пожалуйста. Задачка, которую необходимо решить на Паскале методом while.Ввести число

Помогите, пожалуйста. Задачка, которую необходимо решить на Паскале способом while.
Ввести число N и M, увеличить по +1 N до M циклом и вывести каждый шаг,

Задать свой вопрос
2 ответа
Var
  n,m:integer;
Begin
  write('Введите числа n,m (mgt;либо=n) ');
  Readln(n,m);
  if mgt;=n then while mgt;=n do Begin
    write(n,' ');
    n:=n+1;
  End else write('Ошибочно введён диапазон');
End.  
Ева Гарнина
А почему неправильно введён спектр?
Тимур Копнышев
поэтому что n обязан быть меньше m
Var n,m:integer;
begin
readln(n,m);
while nlt;gt;m do begin
n:=n+1;
writeln(n);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт