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

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

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

program project1;

var
  a, b, c: integer;

begin
  a:= 20;
  b:= 18;
  c:= 31;
  if ((a > 17) and (b > 17) and (c > 7))then
     writeln('Da')
  else
     writeln('Net');

  readln();
end.