Как решить эту проблему ?

Мы не видим вашего полного кода, поэтому оценить всей красоты вашего решения не можем, НО Компилятор явно вас предупреждает, что не стоит стелить грабли туда, куда вы собираетесь падать.
В данном случае он вам говорит, что в блоке кода (в процедуре) вы используете переменные в цикле объявленные снаружи этого блока кода, а следовательно они могут меняться снаружи этого кода, что будет прямо влиять на блок, а не должно. Но что веселее - циклы из процедуры после вызова ее гарантировано изменят значения глобальных переменных, которые много для чего могут использоваться.
В идеале должно быть так, что блок оперирует с данными явно переданными в него как параметры и возвращает обозначенный перечень данных не трогая кроме этого ничего снаружи, у вас же полный фарш граблей:
1. i,j,k - объявлены снаружи блока, а должны внутри, в процедуре.
есть переменные
2. n, a,b,x объявленные снаружи, как глобальные переменные, но при этом их полные тезки передаются в нее как параметры - грязь и потенциальный источник ошибок.
3. eps объявлена снаружи, в процедуре задано значение, но ни разу внутри процедуры не используется - потенциальный источник ошибок, если используется где-то снаружи, и бесполезный бред, если не используется нигде.
4. x, x0 и x1 имеют тот же тип по сути что и b но объявлены почему то все раздельно, при попытке передать в процедуру глобальный x или x0 или x1 получите несоответствие типов.
Как решить - отделите глобальные переменные от тех что используются в подпрограммах дав им разные имена, да этого можно не делать в некоторых случаях, но это даст вам гораздо больше понимания что на что влияет и когда используется. Т. е. я бы, например, написал так: https://onlinegdb.com/HJd8Twud_
При этом я не проверял логику самого метода.

у n значения нет

for var i:=1 to n-1 do

ты точку с запятой забыл