你可能感興趣的試題

下列FORTRAN子程序的功能是用以下公式計(jì)算一組數(shù)據(jù)Z1，Z2，…，Zn的標(biāo)準(zhǔn)差σ：  
σ²=（Z1² +Z2²+…+Zn²）/n-[（Z1+Z2+…+Zn）/n]² 
請?jiān)诔绦蛑械南聞澗€處填入合適的內(nèi)容。

閱讀下列FORTRAN程序：  
INTRINSIC SIN， COS  
WRITE（*，*）FUN（SIN，30.0）/FUN（COS，30.0）  
END  
FUNCTION FUN（F，X）  
X=X*3.14159/180  
FUN=F（X） 
END  
程序運(yùn)行結(jié)果是（）

閱讀下列FORTRAN程序:  
CHARACTER*10 A, B*6  
DO 10 I=1,10  
A(I:I)=' '  
10 COUNTINUE  
A(1:5)='ABCDE'  
B='FGHIJK'  
A(4:9)=B  
WRITE(*,100) A  
100 FORMAT(1X,A)  
END  
程序運(yùn)行結(jié)果是（）

閱讀下列FORTRAN程序：  
DIMENSION M（4，4）  
DATA M/1，2，3，4，5，6，7，8，9，0，1，2，3，4，5，6/  
DO 10 I=1，4  
WRITE （*，100）（M（I，J），J=1，I）  
10 CONTINUE
100 FORMAT（1X，4I2）  
END  
程序運(yùn)行的結(jié)果是（）

閱讀下列FORTRAN程序：  
WRITE（*，10）’YEAR：’， 1996  
10 FORMAT（/3X，A，I4）  
END  
程序運(yùn)行結(jié)果是（^代表空格，下同）（）

閱讀下列FORTRAN程序：  
INTEGER A（3，3）  
DO 10 K=1，3  
DO 10 L=1，3  
10 A（K，L）=K*10+L  
WRITE（*，’（1X，3I3）’）A  
END  
程序運(yùn)行結(jié)果是（）

閱讀下列FORTRAN程序:
INTEGER AA(2,3)  
DATA AA/1,2,3,4,5,6/  
CALL S2D19(AA)  
CALL S2D19(AA(1,2))  
END
SUBROUTINE S2D19(BB)  
INTEGER BB(2,2)  
WRITE(*,'(1X,2I3)') 
BB(1,1),BB(2,2)  
END  
程序運(yùn)行結(jié)果是（）

給定下列FORTRAN子程序如下：  
SUBROUTINE SUB（K，A）  
A=SQRT（K*K+1.0）  
END  
下列調(diào)用語句中正確的是（）