主题：请大鸟帮忙下用QB编写的1+100的流程图是怎么样！~
laipi168
[专家分：0] 发布于 2006-09-14 19:43:00
请大鸟帮忙下用QB编写的1+100的流程图是怎么样！~[em1]
回复列表 （共8个回复）
沙发
maxumi [专家分：2200] 发布于 2006-09-15 07:32:00
1+100=101
板凳
puangenlun [专家分：0] 发布于 2006-09-16 10:23:00
无奈,有语病!!!
3 楼
lihq123 [专家分：30] 发布于 2006-09-29 09:18:00
无语！～～～～～～～～～～～～～～～～～
4 楼
lihq123 [专家分：30] 发布于 2006-09-29 09:24:00
LET a = 1
LET t = 0
WHILE a <= 100
t = a + t
a = a + 1
WEND
PRINT t
你是想要这个东西吗？
5 楼
laipi168 [专家分：0] 发布于 2006-10-18 19:11:00
哎，我写错了把，是1+到100的！~呵呵不好意思
6 楼
wyt1234567 [专家分：0] 发布于 2006-12-06 18:10:00
s=0
for i=1 to 100
s=s+i
next
7 楼
w1212q [专家分：660] 发布于 2006-12-07 16:40:00
screen 12
locate 30,1:print "Print 1 To 100"
locate 1,1
view print 1 to 27
dim i(q to 100)
for d=1 to 100
i(d)=d
next
for g=1 to 100
if inkey$=chr$(13) then end '按回车健退出
print i(g)
for k=0 to 3000:next
next
8 楼
w1212q [专家分：660] 发布于 2006-12-07 16:42:00
for k=0 to 3000:next 里的3000可随意设定；
我来回复
您所在位置：