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

link

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

program lesson9_4;
var
  a, b, c: integer;
begin
  a := 8;
  b := 7;
  c := 10;
  if((a > 17) and (b > 17) and (c > 7)) then
      writeln('yes')
  else
      writeln('no');
  readln();
end.