Вычисление значений тригонометрических функций на основе разложения в ряд Маклорена Опции

[Mad Dam]

помогите пожалуйста сделать задание...
Вычисление значений тригонометрических функций на основе разложения в ряд Маклорена
1. Вычислить с заданной точностью значения тригонометрических функций arctg(x);
2. Построить графики функций arctg(x), где x - ограниченно;
3. Оценить погрешности вычислений;

[Mad Dam]

спасибо..
блин...я даже не знаю как ее вызвать и записать в StringGrid..вот я тупой

Добавлено через 10 мин.
вот нашел в интернете вчера код на паскале для разложения косинуса в ряд...только там график не строится..

Program Cosin1;
var n: word; Cosa: double; xx, slagaem: double; eps,cos1: double;
begin
n:=0; cosa:= 1; slagaem:= 1;
writeln('Вычислим косинус заданного угла.');
write('Введи угол (в радианах, <= 0.7)'); readln(xx);
write('Введи допустимую погрешность (1E-5)--> '); readln(eps);
Repeat
slagaem := -slagaem*sqr(xx)/((n+1)*(n+2));
Cosa := Cosa + slagaem;
inc(n,2);
until abs(slagaem) < eps;
cos1:= cos(xx);
writeln('Cosa = ',cosa,' Cos(x) = ',cos1);
writeln('Погрешность факт. = ',abs(cosa - cos1));
readln;
end.

помоги пожалуйста перестроить его для арктангенса..может так полегче будет..а то я не знаю..вообще ни в чем не разбираюсь, а сделать как-то нужно, чтоб не выкинули..=(