分别以For…next和Do…Loop循环使1+2+3+…+NL=10成立,求最大的N

来源：百度知道 编辑：UC知道 时间：2024/06/04 02:41:29
1．说明下列各项的数据类型

(1)常量vbReb (2)"VB-6.001" (3)Dim s As ung (4)Dim I As mteger (5)Dim My As String

2. 说明下列数据列详细意义

(1)123% (2)&H123& (3)&0123 (4)123. (5)"123"

3. 分别以For…next和Do…Loop循环使1+2+3+…+NL=680成立,求最大的N

在线等的.要快呀！谢谢了！好了再加分

1．说明下列各项的数据类型
(1)常量vbReb 变量
(2)"VB-6.001" 字符串
(3)Dim s As ung (4)Dim I As mteger 没有这两种数据类型吧，题目错了？
5)Dim My As String 字符串
2. 说明下列数据列详细意义

(1)123% 整型数据(2)&H123& 十六进制数(3)&0123 八进制数(4)123. 十进制数(5)"123" 字符串
使1+2+3+…+NL=680成立,求最大的N 什么意思，
是1+2+3+…+N<=680 求最大的N吧

Dim n As Integer: Dim sum As Integer
Do
n = n + 1
sum = sum + n
Loop While sum <= 680
Print n