单项选择题
阅读下列程序
CHARACTER A*4,B*5,C*4
DATA A,B,C/’BIG’,’MIDDLE’,’SMALL’/
WRITE(*,20)A,B,C
20 FORMAT(1X,A2,A3,A4)
END
程序运行结果是()
A. BIGMIDDLE
B. *********
C. BIGMIDSMA
D. BIMIDSMAL
点击查看答案
相关考题
-
单项选择题
阅读下列程序 A=3.5 CALL SUBA(A,A,A) WRITE(*,’(F4.1)’)A END SUBROUTINE SUBA(X,Y,Z) Y=Y-2.0 Z=Z+X END 程序运行的结果是()
A. 7.0
B. 5.0
C. 3.5
D. 1.5 -
单项选择题
阅读下列程序 INTEGER F F(X,Y)=X+Y A=-2.5 B=2.1 B=B+F(A,B) WRITE(*,’(F3.1)’)B END 程序运行的结果是()
A. 1
B. 7
C. 2.1
D. 1.7 -
单项选择题
阅读下列程序 READ(*,*)K WRITE(*,100)K 100 FORMAT(I5) END 程序运行时输入初始值12345,那么显示结果是()
A. 2345
B. 12345
C. ****
D. *****
