阅读下列FORTRAN77程序：INTEGER A（4,4)DATA A/1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16/WRITE（*，

相似题目

• 下列程序输出结果为（ ）。Private Sub Command1_Click()a%=10b%=5Change a,bPrint a,bEnd SubPrivate Sub Change(ByVal a As Integer,b As Integer)Tmp=aa=bb=tmpEnd Sub

  查看最佳答案

• 下列程序段的运行结果是（ ）。Dim A As Integer , B As IntegerA = 15B = 4Print 4 + A B

  查看最佳答案

• 阅读下面一段代码Integer in1 = new Integer(10);Integer in2 = new Integer(10);Integer in3 = 10;Integer in4 = 10;System.out.print(in1 == in2);System.out.print(in1 == in3);System.out.print(in3 == in4);下列选项中，程序的运行结果是（ ）

  查看最佳答案

• 阅读程序：Function Fun（a As Integer)Static C b=0：b=b+2：c=c+2 F=a*b*cEnd FunctionPrivate S

  阅读程序： Function Fun(a As Integer) Static C b=0：b=b+2：c=c+2 F=a*b*c End Function Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 2 Print Fun(A) ； Next End Sub 运行上面的程序，单击命令按钮，输出结果为 A．8 16 B．9 18 C．10 20 D．7 14

  查看最佳答案

• 下列不是FORTRAN77赋值语句的是（)。（A)X＝.TRUE.（B)X＝X*X（C)X＝X**2**2（D)X＝X++

  下列不是FORTRAN77赋值语句的是()。 (A)X＝.TRUE. (B)X＝X*X (C)X＝X**2**2 (D)X＝X++

  查看最佳答案

• 阅读下列FORTRAN程序：DIMENSION A（6)READ（*，*)（A（I)，I=1，6)DO 10 K=1，3S=A（K)A（K)=A（7-K)A（7-K)=

  阅读下列FORTRAN程序： DIMENSION A(6) READ(*，*)(A(I)，I=1，6) DO 10 K=1，3 S=A(K) A(K)=A(7-K) A(7-K)=S 10 CONTINUE WRITE(*，20)(A(I)，I=1，6) 20 FORMAT(1X，2I) END 上述程序运行时，若由键盘输入1，2，3， 4，5，6，则输出的结果为()。 A．1 2 3 4 5 6 B．1 4 2 5 3 6 C．6 5 4 3 2 1 D．6 3 5 2 4 1

  查看最佳答案

• “M不能被N整除”的FORTRAN77表达式是（)。A．（M/N).NE．0B．NOT.（MOD（M,N).NE．0)C．MOD（M,N).NE．0D．IN

  “M不能被N整除”的FORTRAN77表达式是()。 A．(M/N).NE．0 B．NOT.(MOD(M,N).NE．0) C．MOD(M,N).NE．0 D．INT(M/N).NE．0

  查看最佳答案

• 阅读下列FORTRAN程序：DO20K=2，5，2S=1.0DO10J=K，510S=S+J20CONTINUE*WRITE（*，*) SEND执行上述程序

  阅读下列FORTRAN程序： DO 20 K=2，5，2 S=1.0 DO 10 J=K，5 10 S=S+J 20 CONTINUE* WRITE(*，*) S END 执行上述程序后，输出的S值为()。 A．9.0 B．1.0 C．24.0 D．10.0

  查看最佳答案

• 阅读下列FORTRAN程序：DIMENSIONA（3，4)DATAA/3*+4.0，3*-3.0，3*-2.0，3*-1.0/S=0.0DO20K=1，3D=A（K，1

  阅读下列FORTRAN程序： DIMENSION A(3，4) DATA A/3*+4.0，3*-3.0，3*-2.0，3*-1.0/ S=0.0 DO 20 K=1，3 D=A(K，1) DO 10J=2，4 IF(A(K，J)＜D) D=A(K，J) 10 CONTINUE S=S+D 20 CONTINUE WRITE(*，*) S END A．-15.0 B．-12.0 C．9.0 D．6.0

  查看最佳答案

• 下列各类计算机程序设计语言中，不属于高级程序设计语言的是（)。A．Visual BasicB．Fortran语言C．C++

  下列各类计算机程序设计语言中，不属于高级程序设计语言的是()。 A．Visual Basic B．Fortran语言 C．C++语言 D．汇编语言

  查看最佳答案

• 下列程序段错误的是（)。A．Dim a As Integer a=array（1,2,3,4)B．Dim a（),b（) a=array（1,2,3,4): b=

  下列程序段错误的是()。 A．Dim a As Integer a=array(1,2,3,4) B．Dim a(),b() a=array(1,2,3,4): b=a C．Dim a As Variant a=array(1,"aSd",true) D．Dim a()As Variant a=array(1,2,3,4)

  查看最佳答案

• 一个完整的FORTRAN77源程序的组成不应该

  A．只有一个主程序没有子程序 B． 有一个主程序和若干子程序 C． 有一个主程序和一个子程序 D． 只有子程序而没有主程序>

  查看最佳答案

• 阅读下列FORTRAN程序:READ(*,10)A,B,C10FORMAT(1X,F3.1,2X,2F3.2)WRITE(*,*)BEND如果在执行该程序时从键盘输入1234567890↙(其中↙为回车键)则运行后输出的B值为：()。

  A．7.89 B．6.78 C．4.56 D．0.67

  查看最佳答案

• 阅读下列FORTRAN77程序：DIMENSION JA（3)，JB（3，2)DATA JB/1，2，3，4，5，6/DO 10 K=1，310 JA（K)=JB（K，

  阅读下列FORTRAN77程序： DIMENSION JA(3)，JB(3，2) DATA JB/1，2，3，4，5，6/ DO 10 K=1，3 10 JA(K)=JB(K，2) WRITE(*，100)JA 100 FORMAT(1X，6I1) END 上述程序运行后，输出结果为()。 A．123 B．456 C．135 D．246

  查看最佳答案

• 阅读下列FORTRAN程序：PARAMETER（L=3)INTEGER N（L)DATAN/3*0/DO20I=1，LDO20J=1，LN（J)=N（1) +120CO

  阅读下列FORTRAN程序： PARAMETER(L=3) INTEGER N(L) DATA N/3*0/ DO 20 I=1，L DO 20 J=1，L N(J)=N(1) +1 20 CONTINUE WRITE(*，*) N(L) END 上述程序运行后，输出结果是()。 A．3 B．5 C．7 D．9

  查看最佳答案

• 阅读下列FORTRAN77程序：INTEGERA（3,3)DATAA．1,2,3,4,5,6,7,8,9/S=0.0DO10I=1.3J=MOD（I,3)+1S=S+A

  阅读下列FORTRAN77程序： INTEGER A(3,3) DATA A．1,2,3,4,5,6,7,8,9/ S=0.0 DO 10 I=1.3 J=MOD(I,3)+1 S=S+A(I,J) 10 CONTINUE WRITE(*,*)S END 上述程序运行后，输出的S值为()。 A．15 B．12 C．18 D．24

  查看最佳答案

• 阅读下列FORTRAN程序：INTEGERM（3，3)DATAM/1，2，3，4，5，6，7，8，9/DO101=1，3WRITE（*，100) （M（I，J)，J=1

  阅读下列FORTRAN程序： INTEGER M(3，3) DATA M/1，2，3，4，5，6，7，8，9/ DO 10 1=1，3 WRITE(*，100) (M(I，J)，J=1，I) 10 CONTINUE 10 FORMAT (1X，312) END 上述程序执行后，输出结果是()。 A．1 4 7 2 5 8 3 6 9 B．1 2 3 4 5 6 7 8 9 C．1 2 5 3 6 9 D．1 4 5 7 8 9

  查看最佳答案

• 阅读FORTRAN程序：READ（*，*）ND0 10 K=1，NS=S+K**210 CONTINUEWRLTE（*，100）S100 FORMAT（2X，F8.0）END键盘输入5则程序运行后的输出结果是（）

  A．35 B．45 C．65 D．55

  查看最佳答案

• 阅读下列FORTRAN程序：DIMENSION M（6）READ（*，*）MDO 10 J=1，6DO 10 K=J，6JF（M（K）.LT.M（J））THENN=M（K）M（K）=M（J）M（J）=NEND IF10 CONTINUEWRITE（*，100）（M（I），I=1，6）A．1 2 3 7 9 10

  B．10 9 73 2 1 C．7 9 2 1 3 10 D．3 1 2 9 7 10

  查看最佳答案

• 单击命令按钮时，下列程序的执行结果是（)。 Private Sub Command1_Click（) Dim a As Integer，b As Integer，C As Integer a=3 b=4 c=5 Print SecProc（c，b，a) End Sub Function FirProc （x As Integer，y As Integer，z As Integer) FirProc

  A．13 B．16 C．36 D．33

  查看最佳答案

• 阅读 FORTRAN程序： READ（*,"） I,J,KDO 10N=1,2]=I+J+KJ=I+K+JK=I+J+K10 CONTINUEWRTTE（*.20） I,J,K20 FORMAT（2X,315）END键盘输入1, 0, 0则程序运行后的输出结果是（）

  A．4713 B．234 C．112 D．6915

  查看最佳答案

• 阅读下列FORTRAN程序：MQIUH=N （5） +N （10）WRITE（*,’（2X, 15）’）MQIUHENDFUNCTION N （K）N=0DO 10 J=1,kN=N+J10 CONTINUERETURNEND程序运行后的结果是（）

  A．65 B．85 C．90 D．70

  查看最佳答案

• 阅读程序： Sub p（b（) As Integer) For i=1 To 4 b（i)=2*i Next i End 5ub Private Sub Command1_C1ick（) Dima（1 To 4)As InteSera（1)=5a（2)=6a（3)=7a（4)=8 caU p（a) For i=1 To 4 Pdnt a（i) Next i End Sub 运行上面的程序，单击

  查看最佳答案

• 阅读程序： Option Base 1 Private Sub Form_Click（) Dima（3)As Integer Print"输入的数据是:"； Fori=1 To 3 a（i)=InputBox（“输入数据”) Printa（i)； Next Print If a（1)＜a（2) Then t=a（1) a（1)=a（2) a（2)= [10] End If Ifa（2)＞a（3)T

  查看最佳答案