网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
给定下列FORTRAN子程序如下： SUBROUTINE SUB（K，A） A=SQRT（K*K+1.0） END 下列调用语句中正确的是（）
A
CALL SUB（N，N）
B
CALL SUB（X，X）
C
CALL SUB（N，X*X）
D
CALL SUB（11，X）
参考答案
参考解析
解析：
暂无解析
更多 “单选题给定下列FORTRAN子程序如下： SUBROUTINE SUB（K，A） A=SQRT（K*K+1.0） END 下列调用语句中正确的是（）A CALL SUB（N，N）B CALL SUB（X，X）C CALL SUB（N，X*X）D CALL SUB（11，X）” 相关考题
考题
有如下程序，该程序的执行结果是【 】。Private Sub Command1_lick()For i= 1 To 4x= 4For j =1 To 3x =3For k=1 To 2X= K+5Next kNext jNext iPrint xEnd Sub
考题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim aS，b$，c$，k％a=”ABCD”b=”123456”c=””k=1Do While k=Len(a) Or k=Len(b)If k=Len(a)Thenc=cMid(a，k，1)End IfIf k=Len(b)Thenc=cMid(a，k，1)End Ifk=k+1LoopPrint cEnd Sub运行程序，单击命令按钮，输出结果是( )。A．123456ABCDB．ABCDl23456C．D6C584A321D．A182C3D456
考题
阅读下列程序。Option Base 1Private Sub Form. Click()Dim x(3,3)For j=l to 3For k=l to 3If j=k then x(j,k)=lIf j＜＞k then x(j,k)=kNext kNext jCall fun(x())End SubPrivate Sub fun(x() )For j=1 to 3For k=1 to 3Print x(j,k);Next kNext jEnd Sub运行程序时，输出结果为【 】
考题
阅读以下程序：Private Sub Form_click()Dim k, n, m As integern = 20m = 1k = 1Do While k ＜= nm=m+2k = k + 1LoopPrint mEnd Sub单击窗体程序的执行结果是【 】。
考题
以下程序的输出结果是【 】。main(){ int x=0；sub(x，8，1)；printf(“%d\n”，x)；}sub(int *a，int n，int k){ if(k＜＝n)sub(a，n/2，2*k)；*a+=k；}
考题
在窗体上画一个名称为Labell的标签，然后编写如下事件过程： Option Base 1 Private Sub Form_Click() Dim a(20) As Integer For k=1 To 20 a(k)=k^2 Next k Label1.Caption=a(k) End Sub 程序运行后，单击窗体，在标签中显示的内容是 ______。A．400B．20C．441D．出错信息
考题
在窗体中添加一个名称为Cmd1的命令按钮，然后编写如下事件代码： Private Sub Cmd1_Click() a=125 If a＞60 Then k=1 ElseIf a＞70 Then k=2 ElseIf a＞80 Then k=3 ElseIf a＞90 Then k=4 EndIf MsgBox k End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是( )。A．1B．2C．3D．4
考题
下列程序的运行机结果是【 】。Private Sub Form_ Click()Dim k As Integern= 5m= 1k= 1Dom=m+2k= k+1Loop While k＜=nPrint mEnd Sub
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim k As IntegerPrivate Sub form_ Load() k = 15End SubPrivate Sub Command1_ Click()Static b As IntegerDim k As Integer k= k +1 b = b+1 Print k, bEnd Sub程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是______。A．1 1B．1 2C．2 1D．2 2
考题
在窗体中添加一个命令按钮和一个文本框，并编写如下程序代码： Private Sub Command1_Click() k=0 Do While k ＜ 70 k=k+2 k=k*k+k a=a+k Loop Text1．Text=a End Sub 程序运行后，文本框中显示的是A．20B．32C．44D．78
考题
下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }A．6B．7C．8D．9
考题
为某个窗体编写如下事件，单击窗体，消息框显示的结果为【 】。Private Sub Form_Click( )Dim k As Integer ,n As Integer ,m As Integern=10:m=1:k=1Do While k＜=nm=m*2k=k+1LoopMsgBox mEnd Sub
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim k As IntegerPrivate Sub Form_Load()k=15End SubPrivate Sub Command1_Click()Dim b As Integerb=b+kk=k+1Print k,bEnd Sub程序运行时，两次单击命令按钮Command1后，在窗体上输出的第二行是( )。A．17 31B．15 31
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b ＝ b + k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是 _______。A．7 11B．5 11C．76D．2 1
考题
在窗体中有一个名为Command1的命令按钮，事件代码如下： Private Sub Command1_Click（ ） Dim m(10) For k=1 T0 10 m(k)=11=k Next k x=6 MsgBox m(2+m(x)) End Sub 打开窗体，单击命令按钮，消息框的输出结果是（ ）。A.2B.3C.4D.5
考题
若有如下程序： float sub(int a，int b) { return(a*b)； } main() {int i=1，j=2，k=3； printf("%4.0f\n"，sub((int)sub(k+j，j)，k+i))； } 则程序运行后的输出结果是( )。A．40B．32C．16D．编译出错
考题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Coinmand1 Click（ ） Dim a$，b$，c$，k％ a="ABCD" b="123456" c="" k=1 Do While k=Len(a)Or k=Len(b) If k=Len(a)Then c=c＆Mid(a，k，1) End If If k=Len(b)Then c=c＆Mid(a，k，1) End If k=k+1 Loop Print c End Sub 运行程序，单击命令按钮，输出结果是（ ）。A.123456ABCDB.ABCD123456C.D6C584A321D.A1B2C3D456
考题
在窗体上添加如下命令按纽，然后编写如下事件过程： Private Sub Command1_Click() Dim a(10)As Integer Dim p(3)As Integer k= 5 For i = 1 To 10 a(i) = i Next i For i = 1 To 3 p(i) = a(i * i) Next i For i = 1 To 3 k = k + p(i) * 2 Next i Print k End Sub该过程的运行结果为______。A．35B．33C．31D．29
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim k As Integer Private Sub Form_Load() k=15 End Sub Private Sub Command1_Click() Static b As Integer b=b+k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是( )。A．17 31B．15 31C．17 16D．2 1
考题
下面的子程序求一方阵的次对角线上的元素之和。
SUBROUTINE CDJX(M，N，K)
DIMENSION M(N，50)
DO 10 J = 1,N
K=_
10 CONTINUE RETURN END
为了使程序完整，应在_处填入的是：
A.K+M(J，J)
B.K+M(J，N+1—J)
C. K+M(N+J,J)
D. K+M(N+J,N-J)
考题
下面的子程序求一方阵的次对角线上的元素之和
SUBROUTINE CDJX(M,N,K)
DIMENSION M(N,50)
DO 10 J=1，N
K= {pz_填空}
10 CONTINUE
RETURN
END
为了使程序完整，应在{pz_填空}处填入的是：
（A）K+M(J,J)
(B)K+M(J,N+1-J)
(C)K+M(N-J,J)
(D)K+M(N+J,N-J)
考题
多选题下列扩展不确定度的表示中，表示形式是正确的是____。ApUsub95/sub=1%(vsubeff/sub=9)/pBpUsubr/sub=1%(k=2)/pCpusubCr/sub=0.5%/pDU=±0.5%（k=1）
考题
单选题某被测量X最佳估计值为30.0mm，合成标准不确定度为0.3mm。若取k=2，则下列关于其扩展不确定度的表示，正确的是（ ）。A
pUsubrel/sub=0.66mm，k=2/pB
pUsub95/sub=0.3mm，k=2/pC
pU=0.6mm，k=2/pD
pUsubrel/sub=1.0%，k=2/p
考题
单选题下列测量结果的表示中，错误的是（）。A
pIsubS/sub=10.0413A,Usubrel/sub=5×10sup-5/sup，k=2 /pB
pIsubS/sub=10.0413（1±5×10sup-5/sup）A，k=2 /pC
pIsubS/sub=（10.0413±5×10sup-5/sup）A，k=2 /pD
pIsubS/sub=10.0413A,Usub95rel/sub=5×10sup-5/sup，Vsubeff/sub=9 /p
考题
多选题下列表示中____的表示形式是正确的。ApUsub95/sub= 1%,vsubeff/sub =9 /pBpUsubr/sub= 1%,k=2 /pCpusubC/sub=0. 5% /pDpusubC/sub=±0 5%．k=1 /p
考题
单选题标称值为10kΩ的标准电阻在23℃时的校准值Rs为9.9999315kΩ，合成标准不确定度为52mΩ。在被测量服从正态分布的情况下，当包含概率为95%时，测量结果可表示为( )。A
pRsubs/sub=9.99993kΩ，Usub95/sub=0.10Ω，ksub95/sub=1.96/pB
pRsubs/sub=9.999931kΩ，Usub95/sub=0.10Ω，ksub95/sub=1.96/pC
pRsubs/sub=9.99993kΩ，Usub95/sub=102mΩ，ksub95/sub=1.96/pD
pRsubs/sub=9.999931kΩ，Usub95/sub=102mΩ，ksub95/sub=1.96/p
考题
单选题给定子例行程序如下 SUBROUTINE SUB（K，A） B=K+2 A=A+B END 下列调用语句中正确的是（）A
CALL SUB（N，N）B
CALL SUB（X，X）C
CALL SUB（N+2，X）D
CALL SUB（N，X+3）
热门标签
最新试卷