[单选题]

阅读以下FORTRAN程序
  READ(*,*)M,N
  K-MOD(M,N)
  10 IF(K.GT.O) THEN
  M=N
  N=K
  K=MOD(M,N)
  GOT0 10
  ENDIF
  WRITE(*,*)N
  END
  若运行以上程序时,由键盘输入25.11,则程序输出为(  )。

A.3

B.2

C.1

D.0

参考答案与解析:

相关试题

阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10 IF(K.GT.O) THEN<b

[单选题]阅读以下FORTRAN程序  READ(*,*)M,N  K-MOD(M,N)  10 IF(K.GT.O) THEN  M=N  N=K  K=MO

  • 查看答案
  • 阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10 IF(K.GT.O) THEN<b

    [单选题]阅读以下FORTRAN程序  READ(*,*)M,N  K-MOD(M,N)  10 IF(K.GT.O) THEN  M=N  N=K  K=MO

  • 查看答案
  • 阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10 IF(K.GT.O) THEN<b

    [单选题]阅读以下FORTRAN程序  READ(*,*)M,N  K-MOD(M,N)  10 IF(K.GT.O) THEN  M=N  N=K  K=MO

  • 查看答案
  • 阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10 IF(K.GT.O) THEN<b

    [单选题]阅读以下FORTRAN程序  READ(*,*)M,N  K-MOD(M,N)  10 IF(K.GT.O) THEN  M=N  N=K  K=MO

  • 查看答案
  • 阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10IF(K.GT.O)THEN<br

    [单选题]阅读以下FORTRAN程序  READ(*,*)M,N  K-MOD(M,N)  10IF(K.GT.O)THEN  M=N  N=K  K=MOD(

  • 查看答案
  • 阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10IF(K.GT.O)THEN<br

    [单选题]阅读以下FORTRAN程序  READ(*,*)M,N  K-MOD(M,N)  10IF(K.GT.O)THEN  M=N  N=K  K=MOD(

  • 查看答案
  • 阅读FORTRAN程序:<br />READ(*,*)N<br />D0 10 K=1,N<br />S=S+K**2<br />10  CONTINU

    [单选题]阅读FORTRAN程序:READ(*,*)ND0 10 K=1,NS=S+K**210  CONTINUEWRLTE(*,100)S100  FORM

  • 查看答案
  • 阅读FORTRAN程序:<br />READ(*,*)N<br />D0 10 K=1,N<br />S=S+K**2<br />10  CONTINU

    [单选题]阅读FORTRAN程序:READ(*,*)ND0 10 K=1,NS=S+K**210  CONTINUEWRLTE(*,100)S100  FORM

  • 查看答案
  • 阅读FORTRAN程序:<br />READ(*,*)N<br />D0 10 K=1,N<br />S=S+K**2<br />10  CONTINU

    [单选题]阅读FORTRAN程序:READ(*,*)ND0 10 K=1,NS=S+K**210  CONTINUEWRLTE(*,100)S100  FORM

  • 查看答案
  • 阅读FORTRAN程序:<br />READ(*,*)N<br />D0 10 K=1,N<br />S=S+K**2<br />10  CONTINU

    [单选题]阅读FORTRAN程序:READ(*,*)ND0 10 K=1,NS=S+K**210  CONTINUEWRLTE(*,100)S100  FORM

  • 查看答案
  • 阅读以下FORTRAN程序<br />  READ(*,*)M,N<br />  K-MOD(M,N)<br />  10 IF(K.GT.O) THEN<b