[FAC] Arcoseno - MatLab

x = 1.0;
k = 0;
an = 0;
S = x;
while (k <= 200)
an = ((x^(1+2*k))*(1/2)*k)/((factorial(k))+(2*k*(factorial(k))))
S = S + an;
k = k + 1;
end
fprintf('arcsin(%f) = %f',x,S)
fprintf('\n The number of terms used is: %i \n',k)