有程序：K=1DO10I=1，2DO10J=1，210K=K*I／JWRITE（*，*）KEND此程序执行后的输出结果为（）

有程序：DO10I=1，5，3DO10J=I，310K=I+JWRITE（*，*）KEND此程序的运行结果是：（）

当输入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) END

有程序：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时，此程序执行后的输出结果为：（）

有程序：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此程序运行的结果为：（）

下列程序执行后的输出结果为()。 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 END

有程序：K=0DO10I=1，2DO10J=1，210K=K+I／JWRITE（*，*）KEND此程序的执行结果K值为（）

有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）

有程序：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此程序执行后的结果为：（）

有程序：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此程序执行后的结果为：（）

有程序：INTEGERA（3）DATAA／3*1／N=2DO10I=1．NDO10J=1，N10A（I）=A（J）+1WRITE（*，*）A（N）END此程序的运行结果为：（）

执行以下程序段后k的值是( )。int i,j,k=0;for(i=1,j=10;i<=j;i++,j--) k=k+i+j;

下面程序的运行结果是 。main(){int a[10]={1,2,2,3,4,3,4,5,1,5};int n=0,i,j,c,k;for(i=0;i<10-n;i++){c=a[i];for(j=i+1;j<10-n;j++)if(a[j]==c){for(k=j;k<10-n;k++)a[k]=a[k+1];n++;}}for(i=0;i<10-n;i++)printf(\%3d\,a[i]);}

下面程序的运行结果是( )。# include< stdio. h>int main( ){ int a[10]= {1，2，2，3，4.3，4.5，1，5}；int n=0，i，j，c，k；for(i=0；i<10–n；i++){ c=a[i]；for(j=i+1；j<10–n；j++)if(a[j]= =c){ for(k=j；k<10–n；k++)a[k]=a[k+1]；n++；}}for(i=0；i

下面程序段的运行结果是（)。DO 1 I=1,10,21K=K+1PRINT *,KEND（A) 10（B) 8（C) 6（D) 5

有以下程序 main（) {int i=10,j=1; cout＜＜i--＜＜","＜＜++j＜＜endl; 执行后输出结果是A．

下列的程序段执行后，X的值为______。K=0For i=1 To 10For j=i To 10x= x + 1Next jNext iA．50B．55

下述程序段的运行结果是： 　 for（int i=1;i＜=3;i++) for（int j="1;j&amp;lt;=2;j++)" k="1;k&amp;lt;=3;k++)" if （i="=" &amp;&amp; k) printf “%d ”,100*k+10*j+i);＞ A、111 222

以下程序是用选择法对10个整数按升序排序。 【1】 main（) { int i,j,k,t,a[N]; for（i=0;i＜=n-1;i

阅读下列FORTRAN程序：DIMENSION M（6）READ（*，*）MDO 10 J=1，6DO 10 K=J，6JF（M（K）.LT.M（J））THENN=M（K）M（K）=M（J）M（J）=NEND IF10 CONTINUEWRITE（*，100）（M（I），I=1，6）A．1 2 3 7 9 10

求s=1+1×2+1×2×3+…+1×2×3×…×10， 并将结果存到变量s中。请在_________处填上适当的内容，完善程序。 Private Sub Form_Click（) Dim i, j As Integer Dim k As Long s = 0 For i = 1 To 10 k = ____________ For j = 1 To i k = k*j Next j s = s+k Next i Print “s=”;s End Sub

下面程序的功能是产生10个小于100（不含100)的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR（) Randomize Dim a（10) For j=1 To 10a（i)=Int（[14] )If [15] Then k=k+1Print a（j) Next J Print Print k/10 End Suh

有以下程序：includeint main（）{ int sum = 0; for （int i = 1; i ＜= 10; i++） for （int j = 1; j ＜= 10; j += i） sum += i + j; printf（“%d”, sum）;}程序运行后的输出结果是（）

阅读 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则程序运行后的输出结果是（）

20、以下程序段执行后的结果为 。 int a[ ][4]={2,4,6,8,10,11,13,15,17,19,21}; int （*p)[4], i=1,j=1; p=a; printf（&quot;%d\n&quot;, *（*（p+i)+j));