Решение задачи 4 из главы 9
Primary tabs
4. Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.
program Project4; var A, B, C : integer; result : boolean; begin writeln('Vvedite tri zelyh chisla:'); read(A, B, C); result := (A > 17) AND (B > 17) AND (C > 7); if(result = true) then write('A i B bolshe 17, a C bolshe 7. Otvet: da.') else write('A i B bolshe 17, a C bolshe 7. Otvet: net.'); readln();readln(); end.
- Log in to post comments
- 1136 reads
vedro-compota
Mon, 09/07/2020 - 16:42
Permalink
форматирование веток
форматирование веток условного оператора - нет отступов
_____________
матфак вгу и остальная классика =)
testok
Mon, 09/07/2020 - 23:33
Permalink
program Project4;