[单选题]

阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
D0 10 K=1,7
IF(MOD(X(K),2).NE.O)THEN
S=S+X(K)
N=N+1
END IF
10  CONINUE
T=S/N
WRTTE(*,20)S,T
20  FORMAT(2X,3F6.1)
END
程序运行后的输出结果是(  )。

A.23.0 7.7

B.47.0 6.7

C.34.0 8.5

D.57.0 11.4

参考答案与解析:

相关试题

阅读下列FORTRAN程序:<br />INTEGER X(7)<br />DATA X/4,5,7,8,10,12,11/<br />D0 10 K=1,7<

[单选题]阅读下列FORTRAN程序:INTEGER X(7)DATA X/4,5,7,8,10,12,11/D0 10 K=1,7IF(MOD(X(K),2)

  • 查看答案
  • 阅读下列FORTRAN程序:<br />INTEGER X(7)<br />DATA X/4,5,7,8,10,12,11/<br />D0 10 K=1,7<

    [单选题]阅读下列FORTRAN程序:INTEGER X(7)DATA X/4,5,7,8,10,12,11/D0 10 K=1,7IF(MOD(X(K),2)

  • 查看答案
  • 阅读下列FORTRAN程序:<br />INTEGER X(7)<br />DATA X/4,5,7,8,10,12,11/<br />D0 10 K=1,7<

    [单选题]阅读下列FORTRAN程序:INTEGER X(7)DATA X/4,5,7,8,10,12,11/D0 10 K=1,7IF(MOD(X(K),2)

  • 查看答案
  • 阅读下列FORTRAN程序:<br />INTEGER X(7)<br />DATA X/4,5,7,8,10,12,11/<br />D0 10 K=1,7<

    [单选题]阅读下列FORTRAN程序:INTEGER X(7)DATA X/4,5,7,8,10,12,11/D0 10 K=1,7IF(MOD(X(K),2)

  • 查看答案
  • 阅读下列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 />  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 />INTEGER X(7)<br />DATA X/4,5,7,8,10,12,11/<br />D0 10 K=1,7<