Регистрация
Войти
Стать экспертом Правила
Информатика

При вводе с клавиатуры целых чисел A и B, получить на экране все числа, которые расположены между ними. Для упрощения задачи число B больше числа A.Pascal,решить с помощью for.

ОТВЕТЫ

var a, b, i:Integer;

begin

readln(a);

readln(b);

if b <= a then begin

writeln('False');

end;

for i:=a+1 to b-1 do begin

writeln(i);

end;

end.

888
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам