单项选择题
阅读下列程序
DIMENSION M(3,3)
DATA M/1,2,3,4,5,6,7,8,9/
WRITE(*,100)(M(3,J),J=1,3)
100 FORMAT(1X,3I2)
END
程序运行结果是()
A. 2 5 8
B. 3 6 9
C. 4 5 6
D. 7 8 9
点击查看答案
相关考题
-
单项选择题
阅读下列程序 LOGICAL L1,L2,L3,L4,L5 DATA L1,L2,L3/3*.TRUE./ L4=.NOT.L1.AND..NOT.L2.AND.L3 L5=.NOT.L1.OR..NOT.L2.OR.L3 WRITE(*,*)L4,L5 END 程序运行结果是()
A. T T
B. T F
C. F F
D. F T -
单项选择题
阅读下列程序 FUN(c,d)=a*c+b/d DATA a,b/1.0,1.0/ WRITE(*,’(F4.1)’) FUN(a,b)-FUN(b,a) END 程序运行结果是()
A. 0.0
B. 4.0
C. 2.O
D. 3.O -
单项选择题
阅读下列程序 N=0 DO 10 K=1,3 N =N+1 M=K*N 10 CONTINUE WRITE(*,’(1X,2I3)’)M,K END 程序运行结果是()
A. 9 4
B. 9 3
C. 12 4
D. 12 3(#^)
