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

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

var A, B, C: integer;
begin
  writeln('Введите целые числа A, B, C: ');
  readln(A, B, C);
  if(B>17) and (A>17) and (C>7) then
    writeln ('Да.')
  else
    writeln('Нет.');
  readln();
end.