阅读下面程序： 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

阅读下列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