你可能感興趣的試題

閱讀下列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  
程序運行結(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  
程序運行結(jié)果是（）