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

Коля набрал k баллов, Миша n баллов, а Петя d баллов в ходе соревнований. Если:

сумма баллов Коли и Миши больше 20

или произведение баллов Пети и Миши меньше 55

--то тогда вывести в консоль сообщение о том, что ничья, в противном случае вывести сообщение, что победил Коля.

<pre class="brush: php">program project8;
{
Коля набрал k баллов, Миша n баллов, а Петя d баллов в ходе соревнований.
если выполняется условие
(k+n)>20 or d*n<55
то будет ничья, иначе - победил Коля!
}
var
  k,n,d:integer;
  b1,b2:boolean;

begin
  writeln('Skolko ballov u Koli (k): ');
  readln(k);
  writeln('Skolko ballov u Mishi (n): ');
  readln(n);
  writeln('Skolko ballov u Peti (d): ');
  readln(d);

  b1:=(k+n)>20;
  b2:=(d*n)<55;
  if(b1 or b2) then writeln('Pobedila drugba!')
  else writeln('Pobedil Kolia!');
end. </pre> 
Консоль:
<pre class="brush: php"> Skolko ballov u Koli (k): 
3
4

Skolko ballov u Mishi (n): 
8

Skolko ballov u Peti (d): 
1
2

Pobedila drugba!  </pre>