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

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

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

a,b,c: integer;
begin
  writeln('Введите три числа через Enter: ');
  readln(a, b, c);

  if ((a and b > 17) and (c > 7)) then
     writeln('да')
  else
    writeln('нет');

  readln(); 

Консоль:

Введите три числа через Enter:
18
18
3
нет

Введите три числа через Enter:
18
18
9
да

Введите три числа через Enter:
16
15
9
нет