[单选题]

阅读以下FORTRAN程序:
  INT EGER X(7)
  DATA X/10,20,45,70,80,15,14/
  M/X(1)
  DO 10 I=2,7
  IF(X(I).GIM)THCN
  M=X(I)
  K=1
  END IF
  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 />  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/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 />  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(3,3),A<br />  DATA X /1,2,3,4,5,6,7,8,9/<br />  D0

    [单选题]阅读下列FORTRAN程序  INT EGER X(3,3),A  DATA X /1,2,3,4,5,6,7,8,9/  D0 10 1=3  D0

  • 查看答案
  • 阅读下列FORTRAN程序<br />  INT EGER X(3,3),A<br />  DATA X /1,2,3,4,5,6,7,8,9/<br />  D0

    [单选题]阅读下列FORTRAN程序  INT EGER X(3,3),A  DATA X /1,2,3,4,5,6,7,8,9/  D0 10 1=3  D0

  • 查看答案
  • 阅读下列FORTRAN程序<br />  INT EGER X(3,3),A<br />  DATA X /1,2,3,4,5,6,7,8,9/<br />  D0

    [单选题]阅读下列FORTRAN程序  INT EGER X(3,3),A  DATA X /1,2,3,4,5,6,7,8,9/  D0 10 1=3  D0

  • 查看答案
  • 阅读下列FORTRAN程序<br />  INT EGER X(3,3),A<br />  DATA X /1,2,3,4,5,6,7,8,9/<br />  D0

    [单选题]阅读下列FORTRAN程序  INT EGER X(3,3),A  DATA X /1,2,3,4,5,6,7,8,9/  D0 10 1=3  D0

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