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