阅读程序：Private Sub Form_Click() x＝50 For i＝1 To 4 y＝InputBox("请输入一个整数") y＝Val(y) If y Mod 5＝0 Then a＝a＋y x＝y Else a＝a＋x End If Next i Print aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为( )。
- A.100
- B.50
- C.120
- D.70
热度🔥368
参考答案：A
解析：
【解析】程序的作用是输入的数如果是5的倍数就累加，如果不是就与每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15＋15＋35＋35＝100。
【解析】程序的作用是输入的数如果是5的倍数就累加，如果不是就与每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15＋15＋35＋35＝100。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
下列叙述中，错误的是（）。
子过程Plus完成对当前库中"教师表"的工龄字段都加1的操作。
Sub Plus( )
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim fd As ADODB.Field
Dim strConnect As String
Dim strSQL As String
Set cn=CurrentProject.Connection
strSQL = "Select 工龄 from 教师表"
rs.Open strSQL, cn, adOpenDynamic, adLockOptimistic, adCmdText
Set fd = rs.Fields("工龄")
Do While Not rs.EOF
【 】
rs.Update
rs.MoveNext
Loop
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
End Sub
程序空白处【 】应该填写的语句是
有以下程序
#include <stdio.h>
main()
{ char c[2][5]={ "6934", "8254" },*p[2] ;
int i, j, s=0;
for( i=0; i<2; i++ ) p[i]=c[i];
for( i=0; i<2; i++ )
for( j=0; p[i][j]>0 && p[i][j]<='9'; j+=2 )
s = 10*s + p[i][j] - '0';
printf( "%d\n" ,s );
}
程序的输出结果是
以下关于指针的叙述正确是
下列各组软件中，属于应用软件的一组是（ ）。
