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

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

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

program g9z6;
 var a,b,c:integer;

begin
  writeln('vvedite chislo a');
  readln(a);
  writeln('vvedite chislo b');
  readln(b);
   writeln('vvedite chislo c');
  readln(c);
  if (a >17)and(b>17)and(c>7) then
    writeln('da')
  else
    writeln('not');

  readln();

end.