Урок №9 Задание 6
Primary tabs
Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.
program Pr9_6; var a,b,c:integer; begin writeln('Введите три числа: '); readln(a,b,c); if (a>17) and (b>17) and (C>7) then writeln('Да') else writeln('Нет'); readln(); end.
Консоль:
Введите три числа: 2 4 6 Нет
- Log in to post comments
- 303 reads