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

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

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

var
  a, b, c: integer;
begin
    writeln('vvedite 4islo A');
    readln(a);
    writeln('vvedite 4islo B');
    readln(b);
    writeln('vvedite 4islo C');
    readln(c);
    if ((A and B) > 17) and (C > 7)  then
      writeln('da')
    else
      writeln('net');
    readln();
end.