以下程序段
DIMENSION A (4)
READ *,A
I=l
10 J=I十1
20 IF(A(I).LT.A(J))THEN
T=A(J)
A(J)=A(I)
A(I)=T
ENDIF
J=J+1
IF(J.LE.4) GOT0 20
I=I+1
IF(I.LE.3) GOT0 10
PRINT*,A(4)
END
若輸入4,2,3,5,則程序運行結(jié)果為:
(A)4
(B)2
(C)3
(D)5
答案:D
DIMENSION A (4)
READ *,A
I=l
10 J=I十1
20 IF(A(I).LT.A(J))THEN
T=A(J)
A(J)=A(I)
A(I)=T
ENDIF
J=J+1
IF(J.LE.4) GOT0 20
I=I+1
IF(I.LE.3) GOT0 10
PRINT*,A(4)
END
若輸入4,2,3,5,則程序運行結(jié)果為:
(A)4
(B)2
(C)3
(D)5
答案:D

