容桂渔人码头:Qbasic基础

来源:百度文库 编辑:中科新闻网 时间:2024/04/29 11:43:47
写出求100+99+98+97+....+3+2+1的程序,要求使用DO.....LOOP循环三种方法编写
请您在30分钟内解答

Dim Out as Long
Dim i as Long
i = 100
Do Until i = 0
Out = Out + i
i = i - 1
Loop