主题:[讨论]求助高高高高高非常高的高手
hegengcong
[专家分:0] 发布于 2007-10-15 10:27:00
我要做个一个由十几个数字组成的程序
数字随即相加为一个整数
不能相加的要输出
列: 123456789
5相加不成 则输出
请高高高高高非常高的高手帮忙啊~
还不明白题目的高高高高高非常高的高手 请加QQ
34552046
非常感谢!!!
回复列表 (共6个回复)
沙发
lu1012 [专家分:20] 发布于 2007-12-03 19:06:00
??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
板凳
QB小猪 [专家分:1200] 发布于 2007-12-06 18:06:00
什么意思?????????????????????????
3 楼
强强 [专家分:4740] 发布于 2007-12-08 00:47:00
什么意思啊,看不明白
4 楼
木偶之舞 [专家分:60] 发布于 2007-12-28 21:06:00
你在说啥???????????????????????
5 楼
Holykight [专家分:0] 发布于 2008-01-01 13:54:00
CLS
INPUT a$
la = LEN(a$)
DIM a(la)
FOR i = 1 TO la
a(i) = VAL(MID$(a$, i, 1))
NEXT i
FOR i = 1 TO la
FOR j = la TO i + 1 STEP -1
c = a(i) + a(j)
IF c MOD 10 = 0 THEN a(i) = 0: a(j) = 0
NEXT j, i
FOR i = 1 TO la
IF a(i) <> 0 THEN PRINT a(i);
NEXT i
6 楼
taoanran123 [专家分:20] 发布于 2008-01-06 22:41:00
我要做个一个由十几个数字组成的程序
数字随即相加为一个整数
不能相加的要输出
列: 123456789
5相加不成 则输出
请高高高高高非常高的高手帮忙啊~
还不明白题目的高高高高高非常高的高手 请加QQ
34552046
非常感谢!!!
CLS
INPUT a$
la = LEN(a$)
DIM a(la)
FOR i = 1 TO la
a(i) = VAL(MID$(a$, i, 1))
NEXT i
FOR i = 1 TO la
FOR j = la TO i + 1 STEP -1
c = a(i) + a(j)
IF c MOD 10 = 0 THEN a(i) = 0: a(j) = 0
NEXT j, i
FOR i = 1 TO la
IF a(i) <> 0 THEN PRINT a(i);
NEXT i
你写的不能运行
我来回复