Урок 6 Задача 13
Primary tabs
Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7».
var a,b,c:integer; b1:boolean; b2: boolean; begin readln(a,b,c); writeln('chisla a = ',a); writeln('chisla b =',b); writeln('chisla c =',c); b1:= (a>17) and (b>17); b2:= c>7; writeln(b1 and b2); readln(); end.
Консоль:
20 20 8 chisla a = 20 chisla b =20 chisla c =8 TRUE
- Log in to post comments
- 627 reads