阅读下列凹RTl（AN77程序：COMMONK，M，N，LK＝4M＝5CALLAAAWRITE（*，100)K，M，N100FORMAT（1X，12)ENDSUBR（

阅读下列凹RTl(AN77程序：

COMMONK，M，N，L

K＝4

M＝5

CALLAAA

WRITE(*，100)K，M，N

100FORMAT(1X，12)

END

SUBR()UTINEAAA

COMMONJ，K，M，N

J＝J+K

M＝JxK

N＝J+M

END

运行上述程序后，输出的结果为()。

(A) 4

(B) 4

(D) 9

参考答案

您可能感兴趣的试题

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

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

答案解析
阅读下列凹RTRAN 77程序：WRITE（*，10)‘YEAR：’，199610 FORMAT（／3X，A，I4)END程序运行结果是（口代表

答案解析
阅读下列FORTRAN77程序段：S＝0.0DO10J＝0，NS＝S＋XX＝X＋0.510CONTINUE下面程序段中与上述程序段等价的

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

答案解析
阅读下列FORTRANN77程序：INTEGERB（4，5)DATAB／11，20，15，1，9，12，18，2，6，8，*10，3，22，15，21，3，17，9，3

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

答案解析