原创力文档- 1、本文档共5页，其中可免费阅读2页，需付费180金币后方可阅读剩余内容。
- 2、本文档内容版权归属内容提供方，所产生的收益全部归内容提供方所有。如果您对本文有版权争议，可选择认领，认领后既往收益都归您。
- 3、本文档由用户上传，本站不保证质量和数量令人满意，可能有诸多瑕疵，付费之前，请仔细先通过免费阅读内容等途径辨别内容交易风险。如存在严重挂羊头卖狗肉之情形，可联系本站下载客服投诉处理。
- 4、文档侵权举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
程序题：
1：求1/2-2/3+3/5-5/8……前20项
clear
s=0
p=1
q=2
f=1
for i=1 to 10
s=s+p/q*f
t=p
p=q
q=t+p
f=-f
endfor
?s
2 ：判断一个100 以内的数是否为素数
clear
input输入一个数: to n
if n=100
for i=2 to int(sqrt(n)+1)
if n%i=0
exit
endif
endfor
if n=2
?alltrim(str(n))+是一个素数
endif
if
文档评论（0）