更多"程序 PARAMETER (N=3) INTEGER A(N，N) R"的相关试题:
[单项选择]阅读下列FORTRAN77程序：
PARAMETER(L=3)
INTEGER N(L)
DATA N/3*0/
DO 20 I=1，L
DO 20 J=1，L
N(J)=N(I)+1
20 CONTINUE
WRITE(*，*)N(L)
END
上述程序运行后，输出的值为（）。
A. 3
B. 5
C. 7
D. 9
[单项选择]执行下列程序：
STORE 0 TO m,n
DO WHILE n＜=10
m=m+n
n=n+2
ENDDO
m,n
RETURN
在屏幕上显示的输出结果是( )。
A. 20 10
B. 30 10
C. 20 12
D. 30 12
[填空题]执行下面程序段后，k值是 【7】 。
k=1;n=263;
do
k*=n%10;n/=10;
while(n);
[填空题]以下程序段中Do...Loop 循环执行的次数为 【9】 。程序执行完毕后，n的值为 【10】 。
Private Sub Command1_Click（ ）
n =5
Do
If n Mod 2= 0 Then
n =n /2
Else
n =n* 3 + 1
End If
Loop Until n=1
End Sub
[单项选择]有如下程序文件mal.prg:
SET UDFPARMS TO VALUE
n=1
DO proe1 WITH n
n+2
PROCEDURE proc 1
PARAMETERS m
FOR k=2TO 4
m=m+k
ENDFOR
RETURN
在命令窗口输入DO ma1命令后，程序的输出结果是( )。
A. 12
B. 11
C. 10
D. 3
[单项选择]
阅读以下FORTRAN程序
READ(*,*)M,N
K=MOD(M,N)
10 IF(K.GT.0)THEN
M=N
N=K
K=MOD(M,N)
GOTO 10
END IF
WRITE(*,*)N
END
若运行以上程序时，由键盘输入25,11，则程序输出为（）。
A. 3
B. 2
C. 1
D. 0
[单项选择]下列程序的运行结果是( )。
Private Function myfun(m,n)
Do While m>n
Do While m>n:m=m-n:Loop
Do While n>m:n=n-m:Loop
Loop
my fun=m
End Function
Private Sub Command1_Click（ ）
Print myfun(9,8)
End Sub
A. 2
B. 1
C. 4
D. 3
[单项选择]阅读以下FORTRAN程序READ（*，*）M，N．K=MOD（M，N）10IF（K.GT.0）THENM=NN=KK=MOD（M，N）GOT010ENDIFWRITE（*，*）NEND若运行以上程序时，由键盘输入25，11，则程序输出为（）。
A. 3
B. 2
C. 1
D. 0
[单项选择]有以下程序
main( )
{ int k=5,n=0;
do
{ switch(k)
{ case 1: case 3:n+=1;k--;break;
default:n=0;k--;
case 2: case 4:n+=2;k--;break;
}
printf("%d",n);
}while(k＞0&&n<5);
}
程序运行后的输出结果是
A）235 B）0235 C）02356 D）2356
[填空题]以下程序段中Do...Loop 循环执行的次数为______。程序执行完毕后，n的值为______。
Private Sub Command1_Click（ ）
n =5
Do
If n Mod 2= 0 Then
n =n /2
Else
n =n* 3 + 1
End If
Loop Until n=1
End Sub
[填空题]设有如下程序：
SET TALK ON
X=10
M=5
N=6
DO PP2 WITH M,N
DO PP2 WITH M,N
SET TALK ON
PROCEDURE PP2
PARAMETERS M,N
X=M+10
M=M+N
X，M，N
ENDPROC
RETURN
程序执行后，显示的结果分别是 【10】 和 【11】 。
[单项选择]有以下程序
main( )
int k=5,n=0;
do
switch(k)
case 1: case 3:n+=1;k--;break;
default:n=0;k--;
case 2: case 4:n+=2;k--;break;
printf("%d",n);
while(k＞0&&n<5);
程序运行后的输出结果是
A. 235
B. 0235
C. 02356
D. 2356
[填空题]有如下程序：
Private Sub Form_Click（ ）
n=10:i=0
Do
i=i+n:n=n-2
Loop While n＞2
Print i
End Sub
程序运行后，单击窗体，输出结果为______。
[填空题]以下程序段的输出结果是 【15】 。
num=0
Do While num＜=5
num=num+1
Loop
Print num
[单项选择]有下列程序：
main（ ）
int k=5，n=0；
do
switch(k)
case 1： case 3：n+=1；k--；break；
default：n=0；k--；
case2： case 4；n+=2；k--；break；
printf("%d"，n)；
while(k＞0&&n＜5)；
程序运行后的输出结果是( )。
A. 235
B. 0235
C. 02356
D. 2356
[单项选择]有以下程序：
main（ ）
int k=5，n=0；
do
switch(k)
case1：
case3：n+=1；k--；break；
default:n=0;k--；
case2：
case4:n+=2;k--;break；
printf("%d"，n)；
while(k＞0＆＆n＜5)；
程序运行后的输出结果是______。
A. 235
B. 0235
C. 02356
D. 2356
[单项选择]有下列程序：
main（ ）
int k=5,n=0;
do
switch(k)
case 1: case 3:n+=1;k--;break;
default:n=0;k--;
Case 2: case 4;n+=2;k--;break;
printf("%d",n);
while(k＞0 && n＜5) ;
程序运行后的输出结果是( )。
A. 235
B. 0235
C. 02356
D. 2356
[单项选择]有以下程序：
main（ ）
ink k=5，n=0；
do
switch(k)
casel：
case3：n+=1；k--；break；
default：n=0；k--；
case2：
case4：n+=2；k--；break；
printf("%d"，n)；
while(k＞0＆＆n＜5)；
程序运行后的输出结果是______。
A. 235
B. 0235
C. 02356
D. 2356
