Так, ну ход программы, в общем-то, правилен, вот только НЕ СЛЕДУЕТ давать своим идентификаторам имена стандартных функций и констант. В частности, определять переменную "cos". Обзовите её как-нибудь иначе. Ну и добавьте ввод
n и
x, а также, если нужно, останов по завершении счёта, чтобы можно было увидеть результат.
И да, ввод алгебраических дробей сделан абсолютно безграмотно. Вот здесь:
Integral:=(1/n-1)*(sin(x)/cos)+(n-2/n-1)*Integral(x,n-1);
Нужно так:
Integral:=(1/
(n-1
))*(sin(x)/cos)+(
(n-2
)/
(n-1
))*Integral(x,n-1);