Подпрограмма POLIN работает следующим образом. Коэффициент полинома ап расположен в области памяти результата, поэтому если порядок полинома равен 0, то этот коэффициент и есть конечный результат, работа программы завершается. Если порядок полинома больше 0, то коэффициент полинома аn умножается на значение аргумента, после чего к нему прибавляется коэффициент аn. Одновременно с этим порядок уменьшается на 1, после чего происходит проверка: равен ли он 0. Если 0 достигнут, то вычисления завершаются, если нет, то повторяются действия, описанные в двух последних предложениях, и так до получения нулевого значения порядка.