Урок 9 Задача 6
Primary tabs
Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.
var a, b, c: integer; begin {Пользователь по очереди вводит, а программа по очереди считывает три числа} write ('Введите число A: '); readln (a); write ('Введите число B: '); readln (b); write ('Введите число C: '); readln (c); if ((a > 17) and (b > 17) and (c > 7)) then // проверка условия writeln ('Да') else writeln ('Нет'); readln (); end.
Вывод консоли:
Введите число A: 65
Введите число B: 44
Введите число C: 44
Да
Введите число A: 4
Введите число B: 45
Введите число C: 3
Нет
- Log in to post comments
- 264 reads