Задача 2 Урок 10.1
Primary tabs
Пользователь вводит два целых числа, выведите на экран все числа между ними, причем:
Если первое больше второго то в порядке возрастания, пример консоли:1 5 ответ: 1 2 3 4 5Иначе в порядке убывания, пример консоли:
1 2 3 5 3 ответ: 5 4 3Проверить решение для пар значений:
10 20-- должны увидеть все числа от 10 до 20, и для:
20 10-- все числа от 20 до 10 в обратном порядке
Решение:
var i, a, b: integer; begin writeln('vvedite a,b'); readln(a,b); if (a < b) then for i:=a to b do write(i, ' ') else if (a > b) then for i:=a downto b do write(i, ' '); readln(); end.
Консоль
vvedite a,b 10 20 10 11 12 13 14 15 16 17 18 19 20
- Log in to post comments
- 878 reads
vedro-compota
Sat, 05/28/2022 - 19:03
Permalink
учесть случай равенства двух
учесть случай равенства двух чисел
_____________
матфак вгу и остальная классика =)
Neoanthropus
Sat, 05/28/2022 - 22:52
Permalink
var i, a, b: integer;
vedro-compota
Wed, 06/01/2022 - 21:01
Permalink
правильно так:
правильно так:
_____________
матфак вгу и остальная классика =)