задача 4 урок 9:

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

var A, B, C: integer;
begin
  writeln('vvedite chislo A: ');
  readln(A);
  writeln('vvedite chislo B: ');
  readln(B);
  writeln('vvedite chislo C: ');
  readln(C);

  if (((A > 17) AND (B > 17)) AND (C > 7)) then
      writeln('da')
  else
      writeln('net');

  readln();
end.