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

http://fkn.ktu10.com/?q=node/8539
{Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.}

var a,b,c:integer; // переменные для хранения чисел которые будем сравнивать

begin
     writeln('Enter three numbers :'); // числа которые вводит пользователь
     readln(a,b,c);

     if ( (a>17) and (b>17) and (c>7) ) then // условие
          writeln('Yes') // если да
     else
          writeln('No'); // если нет

     readln();

end.