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

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

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

Program u9z6;
var a,b,c:integer;

begin
  writeln('vvedite 3 chisla');
  readln(a,b,c);
  if ((a > 17)and(b > 17)) and (c > 7) then
    writeln('da') else
    writeln('net');
  readln();
end.