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

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

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

решение задачи:

program lesson94;
var A,B,C:integer;
begin
     writeln('vvedite chisla A,B,C');
     readln(A, B, C);
     if (A > 17) AND (B > 17) AND (C > 7) then
        writeln('DA')
     else
         writeln('NET');
     readln();
end.