良乡满堂红婚庆公司:Qbasic基础

来源:百度文库 编辑:高考问答 时间:2024/05/10 13:57:34
写出求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