Точность

[Sour]

sh(x)=1+x^3/3!+x^5+...
n(точность) вводится с клавы
x вводится с клавы
результат ввывести

[Sour]

помогите......

[Awar]

Можно вычислять последовательно члены ряда в цикле "пока не очередной член<точность"
Например,
var i:integer;
x,n,add,sum:real;
begin
write('n, x -?');
readln(n,x);
add:=x*sqr(x)/6;
sum:=1+add;

i:=3;
while add> n do
begin
add:=add*sqr(x)/(i+1)/(i+2);
i:=i+2;
sum:=sum+add;
end;
writeln(sum);
readln;
end.
(Если я правильно понял, как составлен ряд)...