VF ti hao nan de

clear
sum1=1
x=2.5
n=1
mido=x^n / datetrans(n)
do while mido >=10^-6
sum1=sum1+mido*(-1)^(n-1)
n=n+1
mido=x^n / datetrans(n)
ENDDO
? "函数的值为:"
??sum1
FUNCTION datetrans()
parameter n
ji=1
FOR i=1 to n
ji=ji*i
NEXT
RETURN ji
ENDFUNC