网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的运行结果是：（）
A
0
B
24
C
120
D
144
参考答案
参考解析
解析：
当I=0时，J的值分为5、25、45、75、95，而相对应的每一个K值分别为-10、-9、-8、-7、-6、-5，也就是说I=0时，第二层及第三层循环共执行30次，则P=30，而最外层循环变量I的值分别为0、3、6、9，共要执行4次循环，因而P=30×4=120。
更多 “单选题有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的运行结果是：（）A 0B 24C 120D 144” 相关考题
考题
有程序段 for i:=1 to 10 do begin j:=i mod 4; case j of 0:x:‘a‘; 1:x:=‘b‘; 2:x:=‘c‘; 3:x:=‘d‘ end; end; for i:=1 to 10 do write(x:1); writeln; 输出应为( )。
AbcdabcdabcBabcdabcdabCcdabcdabcdDdabcdabcda
考题
以下程序的输出结果是( )。 include main() {int i=10,j=0; do {j=j＋i; i－－; }while(i>5
以下程序的输出结果是( )。 include＜stdio.h＞ main() {int i=10,j=0； do {j=j+i； i--； }while(i＞5)； printf("%d\n"，j)； }
考题
有以下程序#include stdio.hvoid fun(int s[]){ static int j=0； do s[j]+=s[j+1]； while(++j2)；}main(){ int k，a[10]={1，2，3，4，5}； for(k=1；k3；k++) fun(a)； for(k=0；k5；k++) printf("%d"，a[k])；}程序的运行结果是A．34756 B．23445C．35745 D．12345
考题
请读程序: 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
考题
有以下程序#includestdio.hvoid fun(int *s){ static int j=0;do { s[j]=s[j]+s[j+1]; )while(++j2);}main( ){ int k,a[10]={1,2,3,4,5);for(k=1；k3；k++)fun(a)；for(k=0;k5;k++)printf(”%d”,a[k]);printf("\n")；}程序运行后的输出结果是A) 12345B)23445C)34756D) 35745
考题
当执行以下程序后，i的值是5，j的值是4，k的值是【 】。int a, b, c, d, i, j, k;a=10; b=c=d=5; i=j=k=0;for(;a＞b; ++b) i++;while(a＞++c) j++;do {k++;}while(a＞d++);
考题
以下程序的输出结果是 void fun(int*s) { static int j=0； do s[j]+=s[j+1]； while(++j＜2)；} main() { int k，a[10]={1，2，3，4，5}； for(k=1；k＜3；k++)fun(a)； for(k=0；k＜5；k++)printf("%d"，a[k])；}A．34756B．23345C．35745D．12345
考题
阅读下列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程序：
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 程序：
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
考题
有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的运行结果是：（）A、0B、24C、120D、144
考题
有程序：INTEGERM（3，3）DATAM／1，2，3，4，5，6，7，8，9／DO10I=1．3DO10J=1，3K=M（I，J）M（I，J）=M（J，I）M（J，I）=K10CONTINUEWRITE（*，100）（（M（I，J），J=1，3），I=1，3）100FORMAT（1x，3I2）END此程序执行后的结果为：（）A、1；4；7；2；5；8；3；6；9B、1；2；3；4；5；6；7；8；9C、9；6；3；8；5；2；7；4；1D、7；8；9；4；5；6；1；2；3
考题
有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）A、18B、30C、25D、36
考题
有程序：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
考题
有程序：DIMENSIONA（2，2）READ（*，*）ASUM=0DO10I=1，2D010J=1，210A（I，J）=A（I，J）+I+JWRITE（*，*）A（1，2）END当输入1、2、3、4时，此程序执行后的输出结果为：（）A、6B、5C、7D、4
考题
单选题下列程序执行后的输出结果为（ ）。 K=0 DO10I=1，6，2 DO10J=I，6，3 IF(I.EQ.J)THEN K=K+J ELSE K=K+1 ENDIF 10CONTINUE WRITE(*，*)K ENDA
18B
11C
15D
10
考题
单选题当输入1.5，2.5，3.5，4.0下列程序执行后的输出结果为（ ）。 DIMENSIONA(2，2) READ(*，*)A SUM=0 DO10I=1，2 DO20J=I，2 K=A(I，J)*I*J 10A(1，2)=K WRITE(*，*)A(2，1) ENDA
4.0B
5.0C
6.0D
7.0
考题
单选题有程序：INTEGERM（3，3）DATAM／1，2，3，4，5，6，7，8，9／DO10I=1．3DO10J=1，3K=M（I，J）M（I，J）=M（J，I）M（J，I）=K10CONTINUEWRITE（*，100）（（M（I，J），J=1，3），I=1，3）100FORMAT（1x，3I2）END此程序执行后的结果为：（）A
1；4；7；2；5；8；3；6；9B
1；2；3；4；5；6；7；8；9C
9；6；3；8；5；2；7；4；1D
7；8；9；4；5；6；1；2；3
考题
单选题有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）A
18B
30C
25D
36
热门标签
最新试卷