Задача 2 Урок 10.1
Primary tabs
Пользователь вводит два целых числа, выведите на экран все числа между ними, причем:
- Если первое больше второго то в порядке возрастания, пример консоли:
1231
5
ответ: 1 2 3 4 5
- Иначе в порядке убывания, пример консоли:
1235
3
ответ: 5 4 3
Проверить решение для пар значений:
110
20
-- должны увидеть все числа от 10 до 20, и для:
120
10
-- все числа от 20 до 10 в обратном порядке
var a, b, i: integer; begin readln(a, b); if (a < b) then for i:=a to b do write(i, ' ') else for i:=b downto a do write(i, ' '); readln(); end.
- Log in to post comments
- 327 reads