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

Урок 9 Задача 10:

Коля набрал k баллов, Миша n баллов, а Петя d баллов в ходе соревнований. Если:
сумма баллов Коли и Миши больше 20
или произведение баллов Пети и Миши меньше 55
--то тогда вывести в консоль сообщение о том, что ничья, в противном случае вывести сообщение, что победил Коля.

var k, n, d: integer;
begin
  write ('Сколько баллов набрал Коля? '); //пояснение для пользователя
  readln (k);                             // считываем количество баллов Коли
  write ('Сколько баллов набрал Миша? '); //пояснение для пользователя
  readln (n);                             // считываем количество баллов Миши
  write ('Сколько баллов набрал Петя? '); //пояснение для пользователя
  readln (d);                             // считываем количество баллов Пети
  if (k + n > 20) or (d * n < 55) then    //прописываем условие
    writeln ('Ничья')            // вывод на экран, если условие верно
  else
    writeln ('Победил Коля');     // вывод на экран, если условие ложно
  readln ();
end.

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

Сколько баллов набрал Коля? 7
Сколько баллов набрал Миша? 8
Сколько баллов набрал Петя? 10
Победил Коля