阅读下列FORTRAN程序：MQIUH=N （5） +N （10）WRITE（*,’（2X, 15）’）MQIUHENDFUNCTION N （K）N=0DO 10 J=1,kN=N+J10 CONTINUERETURNEND程序运行后的结果是（）
A. 65
B. 85
C. 90
D. 70
查看答案
相关试题
换一换
阅读下列FORTRAN程序：MQIUH=N （5） +N （10）WRITE（*,’（2X, 15）’）MQIUHENDFUNCTION N （K）N=0DO 10 J=1,kN=N+J10 CONTINUERETURNEND程序运行后的结果是（）
A.65 B.85 C.90 D.70
答案
阅读下列FORTRAN程序：MOIUH=N(5)+NdO)WRITE( *，‘(2X，15)，)MQIUH ENDFUNCTION N(K)N=0DOIO J=1,K N=N+J 10 CONTINUE RETURN END程序运行后的结果是：
A.65 B.85 C.90 D.70
答案
阅读以下FORTRAN程序 READ(*,*)M,N K=MOD(M,N) 10 IF(K.GT.0)THEN M=N N=K K=MOD(M,N) GOTO 10 END IF WRITE(*,*)N END 若运行以上程序时，由键盘输入25,11，则程序输出为( )。
A.3 B.2 C.1 D.0
答案
阅读以下FORTRAN程序READ（，*）M, NK=MOD（M，N）10 IF（K.GT.0）THENM=NN=KK=MOD（M，N）COTO 10END IFWRITE（t*，*）NEND若运行以上程序时，由键盘输入： 25，11则程 序输出为（）
A.3 B.2 C.1 D.0
答案
阅读下列FORTRAN77程序： INTEGER A(4，5) DATA A/5*1，5*2，5*3，5*4/ M=0 DO 10 K=1，4 10 M=M+A(K，K+1) WRITE(*，*)M END 上述程序运行后，输出的M值为( )。
A.8 B.9 C.10 D.11
答案
阅读下列FORTRAN程序： INTEGER X（7） DATAX/4，5， 7， 8， 10，12，11/DO 10K=1， 7IF（MOD（X（K），2）.NE .0）THEN S=S+X（K） N=N+1 END IF 10 CONTINUE T=S/N WRITE（*.20）S， T20 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
答案
以下是计算N!(N的阶乘)的FORTRAN程序：READ(*，*)N______DO10K=1，N10S=S*KEND为使程序完整，应在横线处放入()。
A.S=1 B.S=N C.S=0 D.什么都不放
答案
阅读以下程序：inta=5，b=0，c=0；if（a==b+c）printf（***/n）；elseprintf（$$$/n）；以上程序（）
A.有语法错不能通过编译 B.可以通过编译但不能通过连接 C.输出*** D.输出$$$
答案
阅读FORTRAN程序DIMENSI0N M（4， 3）DATE M/-10， 12， 24， 11， 20， -15， 61， 78， 93，30， 44， -45/ N（M（1，1）DO 10I=1，4DO 10J=1，3IF （M（I, J）.LT.N） THENN=M（I, J）K1=IK2=JENDIF10 CONTINUEWRITE （*，’（2x，314）’）N,K1,K2程序运行后
A.93，3, 1 B.-10, 1, 1 C.-45，4,3 D.78,3,2
答案
阅读下列利用递归来求 n! 的程序
A.A ） n-1 B.If (n==1) C.Else D.B ） n-2 E.C ） n F.D ） n+1
答案
热门试题
以下程序 n=0? ? while n<10: if n==5: ? ? ? ? ? ? ? ? ? ? break ? ? ? ? ? ? ? n=n+2 print(n)
阅读以下FORTRAN程序：READ（*.*）MIF（M.LT. 100.AND.M.GT999） STOPK=M/100L=（M-K*100）10N=M-K*100-L*10MM=K+NWRITE（*,（2X,13）） MMEND键盘输入600，则程序的输出结果是（）
阅读 FORTRAN程序： READ（*,"） I,J,KDO 10N=1,2]=I+J+KJ=I+K+JK=I+J+K10 CONTINUEWRTTE（*.20） I,J,K20 FORMAT（2X,315）END键盘输入1, 0, 0则程序运行后的输出结果是（）
阅读下列FORTRAN程序：DIMENSION M(6)READ(*，*)MDO 10 J=l，6 DO 10 K=J,6 IF(M(K)LTM(J))THEN N=M(K)M(K)=M(J)M(J)=N END IF 10 CONTINUEWRITE(*，100)(M(I)，I=1，6)100 FORMAT(2X，614)END键盘输入10，7，9，2，1，3;程序运行后的输出结果是:
阅读以下FORTRAN 程序：READ( *,*) MIF (M. LT. 100. AND. M. GT. 999) STOP K=M/100L=(M - K*100)/10 N= M - K* 100 - L* 10 MM= K + N WRITE( * ,,(2X,I3)")MM END键盘输入600，则程序的输出结果是：
阅读FOKFKAN程序： READ（*， *）N DO 10K-1，N A=S+K**2 10 CONTINUEWRITE（*，100）S 100 FORMAT（2X，F8.0） END键盘输入5则程序运行后的辅出结果是（）
中国大学MOOC: 下列程序执行后，a(n) 与b(n) 结果为______。 Dim a(10), b(10), n As Integer n = 3 For i = 1 To 5 a(i) = i b(n) = 2 * n + i Next i
Fortran是解释执行的程序（）
RD/WR主要对程序语句进行（）
阅读以下FORTRAN程序：READ( *，* )MIF(M. LT. 100. AND. M. GT. 9f9?STOPK=M/100L=(M-K* 100)/10N=M—K*100—L*10MM=K+NWRITEO，(2X，I3))MM END键盘输入600，则程序的输出结果是：
一个FORTRAN程序由若干程序块组成，下列哪项叙述是正确的（）？
阅读FORTRAN程序：READC*，*)I，J，K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUEWRITE(*，20)I，J，K 20 FORMAT(2X，315)END键盘输入1，0，0则程序运行后的输出结果是：
已知顺序数据文件FILE3. DAT有如下数据：50,54,64,6565,70,85,90 46,73,60,72 阅读FORTRAN程序 DIMENSION M（12）OPENdO，FILE=:FILE3. DAT，）READC10，*）（M（I），I=1，12）D0 10J=1，12 IF （M（J）.GE. 60）N=N+1 10 CONTINUE WRITE（*，20）N 20 FORM
已知顺序数据文件FILE3. DAT有如下数据：50,54,64,6565,70,85,90 46,73,60,72 阅读FORTRAN程序 DIMENSION M(12)OPENdO，FILE=:FILE3. DAT，）READC10，*)(M(I)，I=1，12)D0 10J=1，12 IF (M(J).GE. 60)N=N+1 10 CONTINUE WRITE(*，20)N 20 FORMAT(2X，‘N=，，12)END程序输出后的结果是：
阅读下列FORTRAN77程序：INTEGERA(3，3)DATAA/1，2，3，4，5，6，7，8，9/S=0.0DO10I=1，3J=MOD(I，3)+1S=S+A(I，J)10CONTINUEWRITE(*，*)SEND上述程序运行后，输出的S值为()。
M不能被N整除的FORTRAN表达式为：（）
阅读以下FORTRAN程序：INTEGER X(7)DATA X/10,20,45,70,80,15,14/M/X(l)DO 10 1=2,7IF(X(I).GIM)THENM=X(I)K=1 END IF 10 CONTINUEN=X(K)X(K)=X(I)X(I)=NWRITE( *，100)(X(I)，I=1，7)100 FORMAT(2X，713)END 程序运行的结果是：
下列数组定义正确的是: #define N 8 int n；|int a[10];|int a[5];|int n=10,a[n];
FORTRAN程序中，可调数组可以出现在( )。
FORTRAN程序中，可调数组可以出现在：
使用微信扫一扫登录
