求救！！！！这道题怎么编程序？？？？？？？？？

level 1

hwy1999331 楼主

习题：1+4+7+......+x>5000,x最小是多少?

2010年08月13日 09点08分 1

level 1

hwy1999331 楼主

万分感谢！！！！Thanks very much!!!!!!!!!

2010年08月16日 08点08分 3

level 7

JI疾风

CLS
FOR I=1 TO 9999 STEP 3
X=X+I
IF X>5000 THEN PRINT X:END
NEXT I
END

2010年11月09日 10点11分 4

level 6

IQBT高

CLS
I=1
DO
I=I
+3

LOOP UNTIL I>=5000
PRINT I
END

2010年11月09日 13点11分 5

level 7

JI疾风

5楼的程序有误！

2010年11月09日 13点11分 6

level 1

CH◎LSun

cls
s=1
do while s < 5000
x=x+3
s=s+x
loop
print x
end

2010年12月03日 10点12分 7

level 5

7楼的答案虽然对了，程序还是写错了“do while s<=5000”
CLS
x = 1
DO
x = x + 3
LOOP UNTIL x > 5000
PRINT x

2010年12月09日 17点12分 8