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

Задача 4 Урок 9:

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

var a, b, c: integer;
begin
 writeln('Введите целое число a:');
 readln(a);
 writeln('Введите целое число b:');
 readln(b);
 writeln('Введите целое число c:');
 readln(c);
 write('Числа a и b больше 17 и c больше 7 ?  ');
 if (a > 17) and (b > 17) and (c > 7) then
  writeln('да')
 else
  writeln('нет');
 readln();
end.