试题 试卷
题型:单选题 题类:常考题 难易度:普通
广东省惠州市惠城区2017-2018学年八年级下学期信息技术期末考试试卷
Private Sub Command1_Click( )
x=0
n=InputBox("")
For i=1 To n
For j=1 To i
x=x+1
Next j
Next i
Print x
End Sub
程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是( )
Private Sub Form_Click()
Dim x as integer
x=1
n=0
Do while x<100
x=x*3
n=n+1
Loop
Print x,n
for i in range(1, 30) :
if i%5==0:
print (n)
试题篮