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

阅读下列FORTRAN77程序：

DIMENSIONM(3，4)

DATAM/4*2，4*1，4*-1/

N＝0

D010K＝1，4

10N＝N十M(1，K)

WRITE(*，*)N

END

运行上述程序后，输出的N的值为()。

(A) 8

(B) 5

(D) 3

您可能感兴趣的试题

阅读下列FORTRAN77程序：PI＝3.14159265WRITE（*，‘（F7.4)’)PIEND程序运行后输出结果是（)。（A) 3.142（

答案解析
阅读下列FORTRAN77程序：F＝1.0D020K＝3，7，320WRTTE（*，（I3，F8.1)K，K*KEND程序运行结果的最后一行是（

答案解析
阅读下列FORTRAN77程序：EXTERNALPPINTEGER P，PP，Q（4，4)DATAQ／1，2，3，4，5，6，7，8，9，10，11，12，13，14，

答案解析
阅读下列FORTRAN77程序：DIMENSIONP（3，3)D010K＝1，3D010J＝1，310P（K，J)＝（K－1)*3＋JCALLSUB（P（2，1)，3，

答案解析
阅读下列FORTRAN77程序：DIMENSIONA（3，3)D0100K＝1，3D0100J＝1，3100A（K，J)＝K＋JS＝P（A，2，8)WRITE（*，*)

答案解析
阅读FORTRAN77程序：READ（*，100)X100 FORMAT（3F3.1)WRITE（*，*)XEND运行上述程序时，如果从键盘输入

答案解析
阅读下列FORTRAN77程序：INTEGERA（3，2)READ（*，100)A100FORMAT（2I3)WRITE*，*)AEND运行后要使A（1，2)

答案解析

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