搜索结果 - 八十年代交流网

今天是： 2004年10月29日星期五

　v 您现在的位置：交流网首页 >> 编程天地版 >> 正文阅读

[查看相关贴][文本保存][打包邮寄][打印][关闭窗口]

vfp代码2

作者：★冰峰★(xzwn82) 发表于2004-2-11 18:22:10

*求sin（x）
set talk off
clear
k=1
s=0
input "sin（X）的X值：" to x
input "输入n值" to n
for i=1 to n
c=x^(2*i-1)
d=jx(i)
s=s+(-1)^(i-1)*c/d
endfor
?"sin（X）="+str(s,16,14)

function jx
parameters i
K=1
for j=1 to 2*i-1
k=k*j
endfor
return k
*©80*

[查看相关贴][文本保存][打包邮寄][打印][关闭窗口]