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

Hariton
Oct 24, 2020
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
Смежные вопросы: