单选题阅读下列FORTRAN程序： F=1.0 DO 20 K=3， 7， 3 DO 20 L=K-1， K 20 WRTTE（*，’（I3， F8.1）’K， F*K END 程序运行结果的最后一行是（）A 3 6.0B 6 6.0C 6 180.0D 7 180.0
单选题
阅读下列FORTRAN程序： F=1.0 DO 20 K=3， 7， 3 DO 20 L=K-1， K 20 WRTTE（*，’（I3， F8.1）’K， F*K END 程序运行结果的最后一行是（）
A
3 6.0
B
6 6.0
C
6 180.0
D
7 180.0
参考解析
解析：
暂无解析
相关考题：
请阅读以下程序:includeincludevoid fun(int b[]){static int i=0;do{b[i] 请阅读以下程序： #include＜stdio.h＞ #include＜string.h＞ void fun(int b[]) { static int i=0; do {b[i]+=b[i+1]; }while(++i＜2);} main() { int k,a[5]={1,3,5,4,9}; fun(A); for(k=0;k＜5;k++)printf("%d",a[k]);} 上面程序的输出是( )。A．13579B．48579C．48549D．48999
阅读以下程序：Private Sub Form_click()Dim k, n, m As integern = 20m = 1k = 1Do While k ＜= nm=m+2k = k + 1LoopPrint mEnd Sub单击窗体程序的执行结果是【 】。
请读程序: include void fun(int * s) { static int j=0; do s[j]＋=s[j＋1] 请读程序： # include＜stdio．h＞ void fun(int * s) { static int j＝0； do s[j]+＝s[j+1] while( + + j＜2)； } main( ) { int k，a[10]＝{l，2，3，4，5}； for(k＝l；k＜3；k+ +)fun(a)； for(k＝0；k＜5；k++)prinf("%d"，a[k])； } 上面程序的输出结果是 ( )A．34756B．23445C．35745D．12345
下面的算法是计算不带节点的单链表长度，其中能正确执行的是______。A．Function Length(L：Link) integer begin p:=L； j:=0； while p↑.next≠NIL DO [p：=p↑.next； j：=j+1 ] return(j) end;B．Function Length(L：Link) integer begin p：=L； k：=0； while p≠NIL DO [p：=p↑.next； k：=k+1) return(k) end；C．Function Length(L：Link)integer begin p：=L；k：=0； repeat k：=k+1； p=p↑.next until p=NIL return(k-1) end；D．Function Length(L：Link)integer begin p：=L↑.next； k：=1； while p≠NIL DO [k：=k+1； p：=p↑.next] return(k) end；
有下列语句序列:int k=0;do{k＋=5;cout0)cout 有下列语句序列： int k=0; do{k+=5;cout＜＜'$';} while(k＜19); while(k--＞0)cout＜＜'*'; 执行上面的语句序列输出字符“$”和“*”的个数分别是( )。A．4和20B．5和20C．4和21D．5和21
下列语句段中不是死循环的是( )。A．int i=100 While (1) { i=i%100+1 if(i==20) break； }B．int i sum=O； for (i=l;;i++) sum=sum +l；C．int k=0； do { ++K }while(k=O)；D．int s＝3379； while (s+ +%2+3%2)s++；
阅读下列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;程序运行后的输出结果是:A. 1 2 3 7 9 10B. 10 9 7 3 2 1C. 7 9 2 1 3 10D. 3 1 2 9 7 10
阅读以下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 程序运行的结果是：A. 10 20 45 70 80 15 14B. 14 20 45 70 80 15 10C. 80 20 45 70 10 15 14D. 20 45 70 80 15 14 10
阅读下列FORTAN程序：INTEGER X(7)DATA X/4,5,7,8,10,12,11/DO 10 K=l，7IF(MOD(X(K)，2)NE. 0)THEN S=S+X(K)N=N+1 END IF 10 CONTINUE T=S/NWRITE(*，20)S，T 20 FORMAT(2X，3F6.1)END程序运行后的输出结果是：A. 23.0 7.7B. 47. 0 6.7C. 34. 0 8.5D. 57. 0 11.4
阅读以下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，则程序的输出结果是：A. 8B. 3C. 7D. 6
阅读FORTRAN程序：DIMENSION M(4,3)DATE M/-10,12,24,11,20,-15,61,78,93,30,44,-45/N(M(1，1)DO 101=1,4D010J=1，3IF(M(IJ)LT.N)THENN=M(I,J)Kl=lK2=JENDIF10CONTINUEWRITEC*，‘（2X，314)，）N，K1，K2程序运行后的输出结果是：A. 93,3,1B.-10,1,1C.-45,4,3D.78,3,2
阅读下列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.8B.9C.10D.11
阅读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则程序运行后的输出结果是：A. 4 7 13B.2 3 4C. 1 1 2D. 6 9 15
阅读下列FORTRAN程序:INTEGER X(7)DATA X/4，5，7，8，10，12，11/DO 10 K=1，7IF(MOD(X(K),2).NE.0)THENS=A+X(K)N=N+1END IF10 CONTINUET=S/NWRITE(*,20)S,T20 FORMAT(2X,3F6，1)END 程序运行后的输出结果是：（A）12.0 7.7(B)47.0 6.7(C)34.0 8.5(D)57.0 11.4
阅读以下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，则程序的输出结果是：A. 8 B. 3 C. 7 D. 6
阅读FORTRAN程序：READ(*,*)NDO 10 K-1，NS=S+K**210 CONTINUEWRITE(*,100)S100 FORMAT(2X,F8，0)END键盘输入5则程序运行的输出结果是：（A）35(B)45(C)65(D)55
阅读下列FORTRAN 程序： DIMENSION M（6） READ(*，*)M DO 10 J=1，6 DO 10 K=J，6 IF(M（K）.LT.M（J）)THEN N=M(K) M(K)=M(J) M(J)=N END IF10 CONTINUE WRITE(*,100)(M(I),I=1,6) 100 FORMAT(2X,614) END键盘输入10，7，9，2，1，3；程序运行后的输出结果是：（A）1 2 3 7 9 10 （B）10 9 7 3 2 1（C）7 9 2 1 3 10 （D）3 1 2 9 7 10
阅读下列FORTRAN 程序： MQIUH=N(5)+N(10) WRITE(*,’(2X,15)’)MQIUH END FUNCTION N(K) N=0 DO 10 J=1,k N=N+J10 CONTINUE RETURN END程序运行后的结果是：（A）65 （B）85（C）90 （D）70
阅读FORTRAN 程序 DIMENSION M(4，3) DATE M/-10，12，24，11，20，-15，61，78，93，30，44，-45/ N(M(1，1) DO 10I=1，4 DO 10J=1，3 IF （M(I，J).LT.N） THEN N=M(I,J) K1=I K2=J ENDIF10 CONTINUE WRITE(*，’（2x，314）’) N，K1，K2 END程序运行后的输出结果是：（A）93，3，1 （B）-10，1，1（C）-45，4，3 （D）78，3，2
有程序：INTEGERM（5，5）L=0DO40J=1，5DO40K=1，5M（J，K）=K40CONTINUEDO10I=1，5N=1IF（MOD（I，2）．EQ．0）N=2DO10J=N，5，2L=L+M（I，J）10CONTINUEWRITE（*，20）L20FORMAT（2X，‘L=’，I3）END此程序运行的结果为：（）A、L=36B、L=39C、L=54D、L=42
有程序：DIMENSIONA（4，3）DATAA／3*-1．0，3*-2．0，3*-3．0，3*-4．0／S=0．0DO10K=1，4D=ABS（A（K，1））DO20J=2，3IF（ABS（A（K，J））．GT．D）D=ABS（A（K，J））20CONTINUES=S+D10CONTINUEWRITE（*，*）SEND此程序执行后的结果为：（）A、15.0B、12.0C、9.0D、10.0
单选题有程序：INTEGERM（5，5）L=0DO40J=1，5DO40K=1，5M（J，K）=K40CONTINUEDO10I=1，5N=1IF（MOD（I，2）．EQ．0）N=2DO10J=N，5，2L=L+M（I，J）10CONTINUEWRITE（*，20）L20FORMAT（2X，‘L=’，I3）END此程序运行的结果为：（）AL=36BL=39CL=54DL=42
单选题阅读下列FORTRAN程序： DO I=4,2,-1 A=1.0 DO J=I,4,2 A=A+1.0 ENDDO ENDDO WRITE(*,*)A END 运行上述程序后，输出的A值为 （）A 5.0B 4.0C 3.0D 2.0
单选题阅读下列程序 INTEGER A（100），G READ（*，*）N，（A（I），I=1，N） DO 10 I=1，N-1 G=I DO 20 J=I+1，N IF（A（J）.LT.A（G））THEN G=J ENDIF 20 CONTINUE K=A（I） A（I）=A（G） A（G）=K 10 CONTINUE WRITE（*，’（1X，10I2）’）（A（I），I=1，N） END 程序运行时输入的初始值是3，6，9，8，则运行结果是（）A 6 9 8B 8 9 6C 6 8 9D 9 8 6
单选题阅读下列程序 N=0 DO 10 K=1，3 N =N+1 M=K*N 10 CONTINUE WRITE（*，’（1X，2I3）’）M，K END 程序运行结果是（）A 9 4B 9 3C 12 4D 12 3（#^）
单选题阅读下列程序 F=1.0 DO 20，J=3，7，2 DO 20，K=J-1，J 20 F =F*K WRITE（*，’（13，F8.1）’）J，F END 程序运行结果是（）A 3 6.0B 5 120.0C 9 5040.0D 9362880.0