урок 6 задача 13

урок 6 задача 13

Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7».

var
a,b,c:integer;
b1, b2:boolean;
 
 
begin
   write('ведите число A, B, C: ');
   read(a, b, c);
   readln();
   b1:=(A and B) > 17;
   b2:=(C > 7);
   writeln('результат: ', '(A and B) > 17 =  ',b1);
   write('результат: C > 7 = ', b2);
   readln();
end.