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

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

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

var a, b, c: integer;
begin
  writeln('vvedite try celih chisla: ');
  readln(a, b, c);
  if (a > 17) and (b > 17) and (c > 7) then
     writeln( 'Da')
  else
     writeln('Net');
  readln();
end. 

консоль

Vvedite try celyh chisla: a, b, c:
20
20
10
Da

Vvedite try celyh chisla: a, b, c:
10
20
10
Net