Исправить готовую работу в Паскаль ABС

Необходимо исправить готовую программу в ПАСКАЛЬ ABС, а именно вот эту строчку в методичке стр.34:A,b:array[1..n] of double; и исправить другие ошибки, что бы после всех поправок программа запускалась. Отправляю саму программа в паскаль и текст методичке( в методичке могут быть ошибки).
Исходные данные в программе менять не нужно, это в программе начиная с const d0=0.6e-3; и до.........a2=0.042;