[单选题]

有程序:K=1DO10I=1,2DO10J=1,210K=K*I/JWRITE(*,*)KEND此程序执行后的输出结果为()

A . 1

B . 0

C . 0.5

D . 2

参考答案与解析:

相关试题

有程序:K=0DO10I=1,2DO10J=1,210K=K+I/JWRITE(

[单选题]有程序:K=0DO10I=1,2DO10J=1,210K=K+I/JWRITE(*,*)KEND此程序的执行结果K值为()A . 0B . 2C . 2.5D . 1

  • 查看答案
  • 下列程序执行后的输出结果为:K=1DO10I=1,2DO10I=1,210K=K

    [单选题]下列程序执行后的输出结果为:K=1DO10I=1,2DO10I=1,210K=K*I/JWRITE(*,*)KEND()A . 1B . 0C . 0.5D . 2

  • 查看答案
  • 有程序:K=0DO10I=1,6,2DO10J=1,6,3IF(K.LT.I*J

    [单选题]有程序:K=0DO10I=1,6,2DO10J=1,6,3IF(K.LT.I*J)K=I*J10CONTINUEWRITE(*,*)KEND此程序执行后的输出结果为:()A . 18B . 30C . 25D . 36

  • 查看答案
  • 有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*

    [单选题]有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*)KEND此程序的运行结果是:()A . 8B . 4C . 7D . 10

  • 查看答案
  • 下列程序执行后的输出结果为()。K=0DO10I=1,6,2DO10J=I,6,

    [单选题]下列程序执行后的输出结果为()。K=0DO10I=1,6,2DO10J=I,6,3IF(I.EQ.J)THENK=K+JELSEK=K+1ENDIF10CONTINUEWRITE(*,*)KENDA . 18B . 11C . 15D . 10

  • 查看答案
  • 阅读FORTRAN程序:<br />  READV(*,*)I,J,K<br />  DO10N=1,2<br />  I=I+J+K<br />  J

    [单选题]阅读FORTRAN程序:  READV(*,*)I,J,K  DO10N=1,2  I=I+J+K  J=l+K+J  K=I+J+K  10 CON

  • 查看答案
  • 阅读FORTRAN程序:<br />  READV(*,*)I,J,K<br />  DO10N=1,2<br />  I=I+J+K<br />  J

    [单选题]阅读FORTRAN程序:  READV(*,*)I,J,K  DO10N=1,2  I=I+J+K  J=l+K+J  K=I+J+K  10 CON

  • 查看答案
  • 阅读FORTRAN程序:<br />  READ V(*,*)I,J,K<br />  DO 10 N=1,2<br />  I=I+J+K<br />

    [单选题]阅读FORTRAN程序:  READ V(*,*)I,J,K  DO 10 N=1,2  I=I+J+K  J=l+K+J  K=I+J+K  10 

  • 查看答案
  • 阅读FORTRAN程序:<br />  READ V(*,*)I,J,K<br />  DO 10 N=1,2<br />  I=I+J+K<br />

    [单选题]阅读FORTRAN程序:  READ V(*,*)I,J,K  DO 10 N=1,2  I=I+J+K  J=l+K+J  K=I+J+K  10 

  • 查看答案
  • 阅读FORTRAN程序:<br />  READ V(*,*)I,J,K<br />  DO 10 N=1,2<br />  I=I+J+K<br />

    [单选题]阅读FORTRAN程序:  READ V(*,*)I,J,K  DO 10 N=1,2  I=I+J+K  J=l+K+J  K=I+J+K  10 

  • 查看答案