刷题首页
题库
高中信息
题干
Sub test3()双重循环运行 输出图形 与3重复,但3已改题
For i =" 1" To
___1___
step 1
s = ""
For j =" 1" To 2 * i - 1
s =" Str(j)" + s
Next j
List1.AddItem s
Next i
End Sub
该程序的运行后列表框输出的第三行是 ( )
A.33333
B.55555
C.12345
D.54321
上一题
下一题
0.99难度 选择题 更新时间:2016-03-16 03:44:13
答案(点此获取答案解析)
同类题1
输出的结果为
。
Dim n as integer
Dim s as long
n=9
s=0
do while n>=1
s=s+n
n=n-2
loop
print s
同类题2
填空题:(共8分,每小题2分)。
(1) 本程序中,变量a、b 的数据类型都是___________(填写中、英文均可)。
(2)以上代码中,表示输出语句的是第____行。
(3)本程序中,代码a=a+b的含义是_____(选填Ⅰ或Ⅱ)。
选项:Ⅰ.把a的值赋给a+b
Ⅱ.把a加b的和赋给a
(4)若输入的两个数分别是10和20,则程序执行完毕,变量a的值是____,变量b的值是____。
同类题3
若运行时输入5、9,以下流程图的运行结果是_______。
A.14,45
B.14,126
C.a + b,a * b
D.126,14
同类题4
已知赋值语句 s="Good Bye!",则下列定义变量s正确的是( )
A.dim s as integer
B.dim s as long
C.dim s as double
D.dim s as string
同类题5
判断一个整数n(>=3)是否为素数;提示:将一个不小于3的整数n分别除以2到n的平方根之间的所有整数,如果全部除不尽,那么n为素数(质数),否则本为非素数(合数)
编写程序如下:
Sub Form_Click( )
Dim n As Interger
n=InputBox(“请输入一个正整数(n>=3):”)
k=Int(Spr(n))
i=2
Swit=0
While i<="k" And Swit =0
If ① then Swit =1
Else i=i+1
Wend
If Swit="0" Then Print n;”是一个素数”
Else Print n;”不是一个素数”
②
End Sub
(1) 函数Sqr(n)的功能是___________________
(2) 语句Swit="1" 在这段程序中执行___________次
(3) 可用于接受用户输入文本,又可用于显示文本的控件是_____________
(4) VB中保存工程文件的文件扩展名为__________________
(5) 想在程序后面加上注释,应用到_____________符号
(6) 变量K的数据类型定义为_________________(integer或string)
(7) 在这段程序中,所用到的循环语句为__________________
(8) 认真阅读程序,在 ①序号出应补充的语句是________________
(9) Swit是一个标志变量。_______标志着n未被任何一个正整数整除过
(10)代码调试后,发现在 ② 处少语句 ,应填写___________________
相关知识点
算法理论
面向对象程序设计 VB开发工具
赋值语句
选择语句
循环语句
VB程序的调试