阅读下列FORTRAN 程序： MQIUH=N(5)+N(10) WRITE(* ’(2X 15)

阅读下列FORTRAN 程序：

MQIUH=N(5)+N(10)

WRITE(*,’(2X,15)’)MQIUH

END

FUNCTION N(K)

N=0

DO 10 J=1,k

N=N+J

10 CONTINUE

RETURN

END

程序运行后的结果是：

（A）65 （B）85

（C）90 （D）70

参考答案

您可能感兴趣的试题

阅读以下FORTRAN程序 READ（*,*)M,NK=MOD（M,N)M=NN=KK=MOD（M,N)GOTO 10END IFWRITE（*,*)NEND若运

答案解析
阅读以下FORTRAN程序：READ（*，*)M，NK=MOD（M，N)10IF（K.GT.0)THENM=NN=KK=MOD（M，N)COTO10ENDIFWRITE

答案解析
阅读下列FORTRAN77程序：INTEGERB（4，4)，PN＝4CALLSUB（B，N)WRITE（*，*)P（B，N)ENDSUBROUTINESUB（Q，N)I

答案解析
阅读下列FORTRAN77程序：DIMENSIONM（3，4)DATAM／4*2，4*1，4*－1／N＝0D010K＝1，410N＝N十M（1，K)WRITE（*，*

答案解析
设有FORTRAN77函数子程序如下：FUNCTIONIP（N，A)IP＝01F（A.I.T.1.0)IP＝NEND下列函数调用中正确的是（

答案解析
阅读下列FORTRAN程序:INTEGER X(7)DATA X/4 5 7 8 10 12 11

答案解析
阅读下列FORTRAN程序： S=1.0 DO100K=3 1 －1 DO100N=－1 －310

答案解析