qbasic编写接乘

[复制链接]
查看11 | 回复2 | 2008-6-22 14:59:14 | 显示全部楼层 |阅读模式
帮我编出接乘X=1+3! +5! +7! +9!
谁告诉我下..我把全部分送了!!

回复

使用道具 举报

千问 | 2008-6-22 14:59:14 | 显示全部楼层
clss=0s1=1for i=1 to 9 step 2 s=s+s1 s1=s1*(i+1)*(i+2)next iprint send
回复

使用道具 举报

千问 | 2008-6-22 14:59:14 | 显示全部楼层
CLSQ=1:X=0FOR I=1 TO 9 STEP 2 FOR Y=1 TO IQ=Q*Y NEXT Y X=X+Q Q=1NEXT IPRING XEND
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行