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

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

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

program z4;
var a, b, c : integer;
begin
    writeln ('vvedite tri chisla:');
    readln (a, b, c);
    if (a>17)and(b>17)and(c>7) then
        writeln('da')
    else
        writeln('net');
    readln();
end.