Задача 6 Урок 9

Задача 6 Урок 9

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

var A,B,C:integer;
begin
  A:=23;
  B:=22;
  C:=15;
  if ((A > 17) AND (B > 17) AND (C > 7)) then
     writeln('Yes')
  else
     writeln('No');
  readln();
end.