(2008年) 阅读下列FORTRAN程序: DIMENSION M(6) READ (*,*)M DO 10 J=1,6 D0 10 K=J,6 IF(M(K).LTM(J)THEN N=M(K) M(K)=M(J) END IF 10 CONTINUE WRITE(*,100)(M(I),I=1,6) 100 FORMAT(2X,614) END 键盘输入10、7、9、2、1、3;程序运行后的输出结果是( )。
A.
1 2 3 7 9 10
B.
10 9 7 3 2 1
C.
7 9 2 1 3 10
D.
3 1 2 9 7 10
拍照语音搜题,微信中搜索"皮皮学"使用
参考答案:
参考解析:
知识点:
皮皮学刷刷变学霸
举一反三
【简答题】corporate finance have to answer these three questions, 1, what( ) ( )should you take on? 2. where will you get the ( )( )to pay for your investment? 3. how wi...
【简答题】设程序中有如下数组定义和过程调用语句: Dim a(10) as integer …… Call p(a) 如下过程定义中,正确的是 A)Private Sub p(a as integer) B)Private Sub p(a() as integer) C)Private Sub p(a(10) as integer) D)Private Sub p(a(n) as integer)
【简答题】corporate finance have to answer these three questions, 1, what( ) ( )should you take on? 2. where will you get the ( )( )to pay for your investment? 3. how wi...
【简答题】A: Hi, Mary. You were not at school yesterday. 小题1: B: Oh, I had a headache and I had to ask for a sick leave. A: I’m sorry to hear that. 小题2: B: Yes,my mother took me to the hospital. The doctor look...