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

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

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

var a,b,c:integer;
begin
  writeln('vvedite znachenia:');
  readln(a, b, c);
  if (a > 17) AND (b > 17) AND (c>7) then
    writeln('Da')
  else
    writeln('Net');
readln();
end.

Вывод консоли:

Da or Net