<h2>Ошибка</h2>
Знак "больше или равно" пишется в том же порядке, что и читается
Сначала знак больше потом равно
" >= "
<h2>Исправление ошибки</h2>
Заменить 16 строку " if(D=>0) then "
На " if(D>=0) then "
Я считал в паскале .Ответ :5
Количество уровней интенсивности = 2^16 = 65536
878 = 1556₈
...........................