Задача 4 Урок 9
Primary tabs
Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.
program Project1; var a, b, c : integer; begin write('Vvedite pervoe chislo: '); readln(a); write('Vvedite vtoroe chislo: '); readln(b); write('Vvedite tret`e chislo: '); readln(c); if((a>17) and (b>17) and (c>7)) then begin writeln('YES!'); readln(); end else begin writeln('NO!'); readln(); end; end.
- Log in to post comments
- 462 reads