阅读下面程序： INTEGER Q（3，4) DATA Q／4* －1，4* －2，4* －3／S=0DO 10 K=1，310 S=S＋Q（K，K＋1)DO 20 K

阅读下面程序：

INTEGER Q(3，4)

DATA Q/4* -1，4* -2，4* -3/

S=0

DO 10 K=1，3

10 S=S+Q(K，K+1)

DO 20 K=4，2，-1

20 S=S-Q(K-1，K)

WRITE(*，*)S

END

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

A．0.0

B．-1.0

C．-2.0

D．-6.0

参考答案

您可能感兴趣的试题

阅读下列FORTRAN程序 INTEGER X（3,3),ADATA X／1,2,3,4,5,6,7,8,9／ DO 10 I=1,3DO 10 J=I＋1,3A=X（

答案解析
阅读下列FORTRAZ77程序：INTEGER FF（X，Y)＝X＋YA＝－2.5B＝4.0B＝1.0＋F（A，B)WRITE（*，20)B20 FORMAT（1X，F

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

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

答案解析
阅读程序： Sub p（b （) As Integer)For i =1To 4 b（i) = 2（iNext i End Sub Private Sub Comm

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

答案解析
下面程序的输出为（)。 INTEGER A（10) DATA A／1 2 3 4 5 6 7 8

答案解析