网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）
- A、18
- B、30
- C、25
- D、36
参考答案
更多 “有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）A、18B、30C、25D、36” 相关考题
考题
有以下程序#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
考题
请阅读以下程序:includevoid fun(int s[]){static int j=0; dos[j]＋=s[j＋1]; while(＋＋
请阅读以下程序： #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]={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．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
考题
下列程序的功能是：输入l0个整数。‘Private sub Command2_Click Dim i，j，k，temp，arr(11)As Integer Dimresult As String For k=1T0 10 arr(k)=Val(InputBox( “请输入第”k”个数：”，”数据输入窗口”)) Next k i=1 J=10 Do Temp=arr(i) arr(i)=arr(j) arr(j)=tempi=i+1 j=__________LoopWhileresule=””For k=1 To 10 result=resultarr(k)Chr(13)Nextk MsgBoxresult End Sub 横线处应填写的内容是（ ）。A.J-i ijB.j+1 ijC.j+1 ijD.J-1 ij
考题
当执行以下程序后，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程序：
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
考题
下面的子程序求一方阵的次对角线上的元素之和。
SUBROUTINE CDJX(M，N，K)
DIMENSION M(N，50)
DO 10 J = 1,N
K=_
10 CONTINUE RETURN END
为了使程序完整，应在_处填入的是：
A.K+M(J，J)
B.K+M(J，N+1—J)
C. K+M(N+J,J)
D. K+M(N+J,N-J)
考题
阅读下列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
考题
下面的子程序求一方阵的次对角线上的元素之和
SUBROUTINE CDJX(M,N,K)
DIMENSION M(N,50)
DO 10 J=1，N
K= {pz_填空}
10 CONTINUE
RETURN
END
为了使程序完整，应在{pz_填空}处填入的是：
（A）K+M(J,J)
(B)K+M(J,N+1-J)
(C)K+M(N-J,J)
(D)K+M(N+J,N-J)
考题
阅读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（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
考题
单选题有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的运行结果是：（）A
0B
24C
120D
144
考题
单选题阅读下列程序 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
考题
单选题有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）A
18B
30C
25D
36
热门标签
最新试卷
