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

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

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

var
  a, b, c: integer;
begin
  writeln('Enter the first number');
  readln (a);
  writeln('Enter the second number');
  readln(b);
  writeln('Enter the third number');
  readln(c);
  if ((a > 17) and (b > 17) and (c > 7)) then
   writeln('да')
  else
   writeln('нет');
  readln();
end.