单项选择题
阅读下列程序
INTEGER A（100），G
READ（*，*）N，（A（I），I=1，N）
DO 10 I=1，N-1
G=I
DO 20 J=I+1，N
IF（A（J）.LT.A（G））THEN
G=J
ENDIF
20 CONTINUE
K=A（I）
A（I）=A（G）
A（G）=K
10 CONTINUE
WRITE（*，’（1X，10I2）’）（A（I），I=1，N）
END
程序运行时输入的初始值是3，6，9，8，则运行结果是（）
A. 6 9 8
B. 8 9 6
C. 6 8 9
D. 9 8 6
点击查看答案
相关考题
-
单项选择题
阅读下列程序 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
