Задание 6 Урок 9

Задание 6 Урок 9

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

var a,b,c: integer;
begin
  writeln (' vvedite cheloe chislo a');
  readln (a);
  writeln (' vvedite cheloe chislo b');
  readln (b);
  writeln (' vvedite cheloe chislo c');
  readln (c);
if ((a > 17) and (b>17) and (c>7))
   then
   writeln ('da')
else
   writeln ('net');

  readln();
end.            

Консоль:

vvedite cheloe chislo a
20
 vvedite cheloe chislo b
43
 vvedite cheloe chislo c
9
da