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

Урок 9

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

var a, b, c: integer;

begin

  writeln('Vvedite pervoe chislo (int) A =');
  readln(a);
  writeln('Vvedite vtoroe chislo (int) B =');
  readln(b);
  writeln('Vvedite tretye chislo (int) C =');
  readln(c);

  if ((a > 17) AND (b > 17) AND (c > 7)) then
     writeln('da')
  else
      writeln('net');

  readln();

end.

КОНСОЛЬ

Vvedite pervoe chislo (int) A =
15
Vvedite vtoroe chislo (int) B =
500
Vvedite tretye chislo (int) C =
2
net