单项选择题 阅读下列程序 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,则运行结果是()
单项选择题 阅读下列程序 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 程序运行结果是()
单项选择题 阅读下列程序 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 程序运行结果是()