网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
下列程序执行时，需输入数据的记录个数必须为：DIMENSIONA（4，4）READ（*，*）A………………END（）
A
1个
B
4个
C
16个
D
不超过16个
参考答案
参考解析
解析：
每个记录最少可以为1个数据。
更多 “单选题下列程序执行时，需输入数据的记录个数必须为：DIMENSIONA（4，4）READ（*，*）A………………END（）A 1个B 4个C 16个D 不超过16个” 相关考题
考题
（ 35 ）在窗体中有一个命令 run35, 对应的事件代码如下：private sub run35_enter()Dim num as integerDim a as integerDim b as integerDim I as integerFor I=1 to 10Num=inputbox( “ 请输入数据： ” , ” 输入 ” ,1)If int(num/2)=num/2 thenA=a+1ElseB =b+1End ifNext IMsgbox( ” 运行结果： a= ” str(a) ” ,b= ” str(b))End sub运行以上事件所完成的功能是A 对输入的 10 个数据求累加和B 对输入的 10 个数据求各自的余数，然后再进行累加C 对输入的 10 个数据分别统计有几个是整数，有几个是非整数D 对输入的 10 个数据分别统计有几个是奇数，有几个是偶数
考题
阅读程序：Option Base 1Private Sub Form_Click（）Dim a（3）As IntegerPrint "输入的数据是：";For i = 1 To 3a（i）=InputBox（"输入数据"）Print a（i）;NextPrintIf a（1）t = a（1）a（1）= a（2）a（2）= ________End IfIf a（2）a（3）Thenm = a（2）ElseIf a（1）a（3）Thenm = ________Elsem = ________End IfPrint "中间数是：";mEnd Sub程序运行后，单击窗体，在输入对话框中分别输入三个整数，程序将输出三个数中的中间数，如图所示。请填空。
考题
在窗体中有一个命令按钮run35，对应的事件代码如下： Private Sub run35_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i= 1 To 10 num = InputBox("请输入数据:", "输入", 1) If Int(num/2) = num/2 Then a=a+1 Else b=b+1 End If Next i MsgBox("运行结果: a=" Str(a)",b=" Str(b)) End sub 运行以上事件所完成的功能是______。A．对输入的10个数据求累加和B．对输入的10个数据求各自的余数，然后再进行累加C．对输入的10个数据分别统计有几个是整数，有几个是非整数D．对输入的10个数据分别统计有几个是奇数，有几个是偶数
考题
运行下面的程序，单击命令按钮后，当输入分别为123和456时，输出结果为 ______。 Private Sub Command1_Click() a=InputBox("请输入一个数字:") b=Val(InputBox("请再输入一个数字：")) PrInt a+b End SubA．123B．456C．123123D．579
考题
有如下程序，运行时从键盘输入3，输出结果是 ______。 Private Sub Command1_Click() a=InputBox("请输入一个数字：") Select Case a Case Is＞2 b=a+1 Case Is＞3 b=a+2 Case Is＞4 b=a＋3 Case Is＞5 b＝a＋4 End Select Print a ＋ b End SubA．8B．7C．6D．9
考题
窗体中有命令按钮run34，对应的事件代码如下：Private Sub run34_Enter()Dim num As Integer,a As Integer,b As Integer,i As IntegerFor i=1 To 10num=InputBox(“请输入数据：”，“输入”)If Int(num／2)=num／2 Thena=a+lElseb=b+1End ifNext iMsgBox(“运行结果：a=“Str(a)”，b=”Str(b))End Sub运行以上事件过程，所完成的功能是( )。A．对输入的10个数据求累加和B．对输入的10个数据求各自的余数，然后再进行累加C．对输入的10个数据分别统计奇数和偶数的个数D．对输入的10个数据分别统计整数和非整数的个数
考题
运行以下程序时，由键盘为变量load输入的数据为20，输出结果为______。 Private Function Wei(load As Integer)，Money As Single If load＜20 Then Money=load/2 Else Money=20+load End if Wei=Money End Function Private Sub Form. _Click() Dim load As Integer，fee As Single load=InputBox(“请输入一个数：”) fee=Wei(loaD)Print fee End SubA．10B．20C．30D．40
考题
下列程序： Private Sub Command1_Click() a=InputBox("请输入") b=InputBox("请输入") Print=a+b End Sub 运行时输入3和4，输出的结果是A．7B．34C．3+4D．出错
考题
下列程序的执行结果为includevoid main( ){ int a=3,b=0; int * p=a; b=＋a＋＋;
下列程序的执行结果为 #include＜iostream.h＞ void main( ) { int a=3，b=0； int * p=a； b=+a++； cout＜＜*p＜＜','＜＜b＜＜end1； }A．3，4B．4，3C．3，4D．4，4
考题
执行以下程序段，如果在对话框中输入8，输出结果是"Hello"的是______。A．n = InputBox("请输入一个数") Select Case n Case 7 To 1 Print "Hello" End SelectB．n = InputBox("请输入一个数") Select Case n Case Is＞1, Is ＜ 6 Print "Hello" End SelectC．n = InputBox("请输入一个数") Select Case n Case Is ＞ 5, 1, 3 To 10 Print "Hello" End SelectD．n=InputBox("请输入一个数") Select Case n Case 1, 5, Is ＞ 9 Print "Hello" End Select
考题
阅读以下FORTRAN程序
READ(*,*)M,N
K=MOD(M,N)
10 IF(K.GT.0)THEN
M=N
N=K
K=MOD(M,N)
GOTO 10
END IF
WRITE(*,*)N
END
若运行以上程序时，由键盘输入25,11，则程序输出为( )。A.3
B.2
C.1
D.0
考题
阅读下列FORTRAN77程序：
READ(* , *)X
IF(X.LE.0) THEN
Y=0.0
ELSE IF ((X.LT.5.0).AND.(X.NE.2.0)) THEN
Y= 1/X
ELSE IF (X.LE.10.0) THEN
Y=1/(X+2)
ELSE
Y = 10.0
END IF
WRITE(* , *)Y
END
上述程序运行时，由键盘输入2，则输出的结果为()。
A．0.5
B．0.25
C．10.0
D．0.0
考题
有程序：READ（*，50）SWRITE（*，100）S50FORMAT（1X，F7．3）100FORMAT（1X，F8．3）END执行此程序，由键盘输入123456789，则输出S的值为：（）A、1234.576B、2345.678C、345.678D、*******
考题
有程序：DIMENSIONA（2，2）READ（*，*）ASUM=0DO10I=1，2D010J=1，210A（I，J）=A（I，J）+I+JWRITE（*，*）A（1，2）END当输入1、2、3、4时，此程序执行后的输出结果为：（）A、6B、5C、7D、4
考题
有程序：DIMENSION（4，4）READ（*，*）AWRITE（*，10）A10FORMAT（1x，6E9．2）END此程序执行后的输出结果的记录数为：（）A、2B、3C、4D、16
考题
单选题当输入1.5，2.5，3.5，4.0下列程序执行后的输出结果为（ ）。 DIMENSIONA(2，2) READ(*，*)A SUM=0 DO10I=1，2 DO20J=I，2 K=A(I，J)*I*J 10A(1，2)=K WRITE(*，*)A(2，1) ENDA
4.0B
5.0C
6.0D
7.0
考题
单选题有程序：DIMENSION（4，4）READ（*，*）AWRITE（*，10）A10FORMAT（1x，6E9．2）END此程序执行后的输出结果的记录数为：（）A
2B
3C
4D
16
考题
单选题阅读下列程序 READ（*，*）K WRITE（*，100）K 100 FORMAT（I5） END 程序运行时输入初始值12345，那么显示结果是（）A
2345B
12345C
****D
*****
热门标签
最新试卷
