题目内容
（请给出正确答案）
[主观题]
阅读分析程序 , 写出程序 的功能和运行结果 。 程序功能:______________ 运行结果:______________
提问人：网友wk11766988
发布时间：2022-01-07
如搜索结果不匹配，请 
题目内容
（请给出正确答案）
您可能会需要：
安装简答题APP，拍照搜题省时又省心！
更多“阅读分析程序 , 写出程序 的功能和运行结果 。 程序功能:…”相关的问题
第2题
阅读程序,写出运行结果。 输入数据1 2 3 4 5 6 7 8 9 10,则运行结果为:
A．1 2 3 4 5 6 7 8 9 10
点击查看答案
B．10 9 8 7 6 5 4 3 2 1
C．1 2 3 4 5 换行 6 7 8 9 10
D．10 9 8 7 6 换行5 4 3 2 1
第3题
下段程序的运行结果是 void main() { char *p,*q; char str[]="Hello,World\n"; q = p = str; p++; print(q); print(p); } void print(char *s) { printf(“%s”,s); }
A、H e
B、Hello，World ello，World
C、Hello，World Hello，World
D、ello，World ell，World
第4题
阅读下列程序并写出程序运行结果。Private Sub Form_Click()Dim A(1 To 3) As StringDim c As I
阅读下列程序并写出程序运行结果。
点击查看答案
Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "4"
A(2) = "8"
A(3) = "12"
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
写出程序运行时单击窗体后，窗体Form1上的结果。
第5题
阅读下列程序并写出程序运行结果。Private Sub Form_Click()Dim x As IntegerStatic y As Integ
阅读下列程序并写出程序运行结果。
点击查看答案
Private Sub Form_Click()
Dim x As Integer
Static y As Integer
x = x + 2
y = y + 3
Form1.Print "x="; x, "y="; y
End Sub
写出程序运行时连续单击三次窗体后，Form1上的输出结果。
第6题
阅读下列程序并写出程序运行结果。Public Sub change1(ByVal x As Integer, ByVal y As Integer
阅读下列程序并写出程序运行结果。
点击查看答案
Public Sub change1(ByVal x As Integer, ByVal y As Integer)
Dim t As Integer
t = x
x = y
y = t
End Sub
Public Sub change2(x As Integer, y As Integer)
Dim t As Integer
t = x
x = y
y = t
End Sub
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 22: b = 33
change1 a, b
Form1.Print "A1="; a, "B1="; b
a = 22: b = 33
change2 a, b
Form1.Print "A2="; a, "B2="; b
End Sub
写出程序运行时，单击窗体Form1上的输出结果。
第7题
上机运行以下三段程序的结果。请先阅读程序写出程序运行时应输出的结果,然后上机运行程序,验证自己分析的结果是否正确。 程序1: 程序2: 程序3: 结果以如下形式提交: 程序1: 程序2: 运行截图 程序3: 运行截图
第8题
阅读下列程序并写出程序运行结果。Private Sub Command1_Click()x = 0Do While x < 60x = (x +
阅读下列程序并写出程序运行结果。
点击查看答案
Private Sub Command1_Click()
x = 0
Do While x < 60
x = (x + 3) * (x + 4)
n = n + 1
Loop
Text1.Text = Str(n)
Text2.Text = Str(x)
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
写出程序运行后，文件框Text3的结果。
