回 帖 发 新 帖 刷新版面

主题:qb的循环语句

请告诉我算1+2+3.....+50如何写

回复列表 (共5个回复)

沙发

for i=1 to 50
  s=s+i
 next i
print s
 搞定!!!1

板凳

我是不是有点^..^

3 楼

CLS
S=0;I=1
DO
  S=S+I
  I=I+1
  LOOP UNTIL I=51
PRINT "S=";S
END


4 楼

DIM n AS INTEGER, S AS INTEGER
s=0
n=1
WHILE n <=50
s=s+n
n=n+1
WEND
END

5 楼

for i = 1 to 50
 s=s+i
next i
print s

我来回复

您尚未登录,请登录后再回复。点此登录或注册