[单选题]

阅读以下FORTRAN程序:
  INTEGERX(7)
  DATAX/10,20,45,70,80,15,14/
  M/X(1)
  DO10I=2,7
  IF(X(I).GIM)THCN
  M=X(I)
  K=1
  ENDIF
  10 CONTHNUI
  N=X(K)
  X(K)=X(I)
  X(I)=N
  WRITE(*100)(X(I),I=1,7)
  100 FORRMAT(2X,713)
  END
  程序运行的结果是(  )。

A.10204570801514

B.14204570801510

C.80204570101514

D.20457080151410

参考答案与解析:

相关试题

阅读以下FORTRAN程序:<br />  INTEGERX(7)<br />  DATAX/10,20,45,70,80,15,14/<br />  M/X(1)

[单选题]阅读以下FORTRAN程序:  INTEGERX(7)  DATAX/10,20,45,70,80,15,14/  M/X(1)  DO10I=2,7

  • 查看答案
  • 阅读以下FORTRAN程序:<br />  INT EGER X(7)<br />  DATA X/10,20,45,70,80,15,14/<br />  M/X

    [单选题]阅读以下FORTRAN程序:  INT EGER X(7)  DATA X/10,20,45,70,80,15,14/  M/X(1)  DO 10

  • 查看答案
  • 阅读以下FORTRAN程序:<br />  INT EGER X(7)<br />  DATA X/10,20,45,70,80,15,14/<br />  M/X

    [单选题]阅读以下FORTRAN程序:  INT EGER X(7)  DATA X/10,20,45,70,80,15,14/  M/X(1)  DO 10

  • 查看答案
  • 阅读以下FORTRAN程序:<br />  INT EGER X(7)<br />  DATA X/10,20,45,70,80,15,14/<br />  M/X

    [单选题]阅读以下FORTRAN程序:  INT EGER X(7)  DATA X/10,20,45,70,80,15,14/  M/X(1)  DO 10

  • 查看答案
  • 阅读以下FORTRAN程序:<br />  INT EGER X(7)<br />  DATA X/10,20,45,70,80,15,14/<br />  M/X

    [单选题]阅读以下FORTRAN程序:  INT EGER X(7)  DATA X/10,20,45,70,80,15,14/  M/X(1)  DO 10

  • 查看答案
  • 阅读以下FORTRAN程序:<br />  INT EGER X(7)<br />  DATA X/10,20,45,70,80,15,14/<br />  M/X

    [单选题]阅读以下FORTRAN程序:  INT EGER X(7)  DATA X/10,20,45,70,80,15,14/  M/X(1)  DO 10

  • 查看答案
  • 阅读下列FORTRAN程序:<br />INTEGERX(7)<br />DATAX/4,5,7,8,10,12,11/<br />D010K=1,7<br

    [单选题]阅读下列FORTRAN程序:INTEGERX(7)DATAX/4,5,7,8,10,12,11/D010K=1,7IF(MOD(X(K),2).NE.

  • 查看答案
  • 阅读下列FORTRAN程序:<br />INTEGERX(7)<br />DATAX/4,5,7,8,10,12,11/<br />D010K=1,7<br

    [单选题]阅读下列FORTRAN程序:INTEGERX(7)DATAX/4,5,7,8,10,12,11/D010K=1,7IF(MOD(X(K),2).NE.

  • 查看答案
  • 阅读下列FORTRAN程序<br />  INTEGERX(3,3),A<br />  DATAX/1,2,3,4,5,6,7,8,9/<br />  D010 1

    [单选题]阅读下列FORTRAN程序  INTEGERX(3,3),A  DATAX/1,2,3,4,5,6,7,8,9/  D010 1=3  D010 J=

  • 查看答案
  • 阅读下列FORTRAN程序<br />  INTEGERX(3,3),A<br />  DATAX/1,2,3,4,5,6,7,8,9/<br />  D010 1

    [单选题]阅读下列FORTRAN程序  INTEGERX(3,3),A  DATAX/1,2,3,4,5,6,7,8,9/  D010 1=3  D010 J=

  • 查看答案
  • 阅读以下FORTRAN程序:<br />  INTEGERX(7)<br />  DATAX/10,20,45,70,80,15,14/<br />  M/X(1)