С клавиатуры вводятся два целых числа, вывести в порядке возрастания все целые числа расположенные между А и В
Ответы на вопрос
Ответил ilyamaximov514
0
Pascal ABC:
var a, b: Integer;
begin
readln(a);
readln(b);
b:=b-1;
for a:=a+1 to b do
writeln(a);
end.
Пример:
Вводим 1 и 5. Получаем:
2
3
4
var a, b: Integer;
begin
readln(a);
readln(b);
b:=b-1;
for a:=a+1 to b do
writeln(a);
end.
Пример:
Вводим 1 и 5. Получаем:
2
3
4
Новые вопросы