网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
阅读下列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
参考答案
参考解析
解析：
暂无解析
更多 “单选题阅读下列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” 相关考题
考题
请阅读以下程序: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(*，*)M
DO 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 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程序：
INTEGER X(7)
DATA X/10,20,45,70,80,15,14/
M/X(l)
DO 10 1=2,7
IF(X(I).GIM)THEN
M=X(I)
K=1 END IF 10 CONTINUE
N=X(K)
X(K)=X(I)
X(I)=N
WRITE( *，100)(X(I)，I=1，7)
100 FORMAT(2X，713)
END 程序运行的结果是：
A. 10 20 45 70 80 15 14
B. 14 20 45 70 80 15 10
C. 80 20 45 70 10 15 14
D. 20 45 70 80 15 14 10
考题
阅读下列FORTAN程序：
INTEGER X(7)
DATA X/4,5,7,8,10,12,11/
DO 10 K=l，7
IF(MOD(X(K)，2)NE. 0)THEN S=S+X(K)
N=N+1 END IF 10 CONTINUE T=S/N
WRITE(*，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程序：
READ( *，* )M
IF(M. LT. 100. AND. M. GT. 9f9?STOP
K=M/100
L=(M-K* 100)/10
N=M—K*100—L*10
MM=K+N
WRITEO，(2X，I3))MM END
键盘输入600，则程序的输出结果是：
A. 8
B. 3
C. 7
D. 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,4
D010J=1，3
IF(M(IJ)LT.N)THENN=M(I,J)
Kl=lK2=JENDIF10CONTINUE
WRITEC*，‘（2X，314)，）N，K1，K2程序运行后的输出结果是：
A. 93,3,1
B.-10,1,1
C.-45,4,3
D.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.8
B.9
C.10
D.11
考题
阅读FORTRAN程序：
READC*，*)I，J，K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUE
WRITE(*，20)I，J，K 20 FORMAT(2X，315)
END
键盘输入1，0，0则程序运行后的输出结果是：
A. 4 7 13
B.2 3 4
C. 1 1 2
D. 6 9 15
考题
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4，5，7，8，10，12，11/
DO 10 K=1，7
IF(MOD(X(K),2).NE.0)THEN
S=A+X(K)
N=N+1
END IF
10 CONTINUE
T=S/N
WRITE(*,20)S,T
20 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( *,*) M
IF (M. LT. 100. AND. M. GT. 999) STOP
K=M/100
L=(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(*,*)N
DO 10 K-1，N
S=S+K**2
10 CONTINUE
WRITE(*,100)S
100 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 IF
10 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+J
10 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
ENDIF
10 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此程序运行的结果为：（）A
L=36B
L=39C
L=54D
L=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
热门标签
最新试卷