更多"设有如下程序文件:
SET TALK OFF
CL"的相关试题:
[单项选择]设有如下程序文件:
SET TALK OFF
CLEAR
DIMENSION a(2,3)
i=1
DO WHILE i<=2
j=1
DO WHILE j<=3
a(i,)=i+j
a(i,j)
j=j+1
ENDDO
i=i+1
ENDDO
SET TALK ON
RETURN
执行此程序,程序的运行结果为( )。
A. ARCHIVE
B. CODE
C. ALT
D. ALIGN
[单项选择]设有如下程序文件:
SET TALK OFF
CLEAR
DIMENSION a(2,3)
i=1
DO WHILE i<=2
j=1
DO WHILE j<=3
a(i,)=i+j
a(i,j)
j=j+1
ENDDO
i=i+1
ENDDO
SET TALK ON
RETURN
执行此程序,程序的运行结果为
A. 2 3 4
B. 1 2 3
C. 1 2 3
D. 2 3 4
[单项选择]有如下一段程序:
SET TALK OFF
A=1
B=0
DO WHILE A<=100
IF.NOT.A/2=INT(A/2)
B=B+A
ENDIF
A=A+1
ENDDO
B
SET TALK ON
RETURN
该程序的功能是______。
A. 求1~100之间的累加和
B. 求1~100之间的累加和除以2的商
C. 求1~100之间的偶数之和
D. 求1~100之间的奇数之和
[填空题]设有如下程序:
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】 。
[单项选择]执行下列程序:
CLEAR
SET TALK OFF
STORE 1 TO i,a,b
DO WHILE i<=3
DO PROG1
"P("+STR(i,1)+")="+STR(a,2)+","
i=i+1
ENDDO
"b="+STR(b,2)
RETURN
PROCEDURE PROGl
a=a*2
b=b+a
SET TALK ON
RETURN
程序的运行结果为( )。
A. 非私有
B. 私有
C. public
D. protected