网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
5、有以下程序段： INTEGER A（5),T DATA A/1，2，3，4，5/ DO I=1，2 T=A（I) A（I)=A（6-I) A（6-I)=T ENDDO PRINT*, A（5) END 执行以上程序后，输出的A（5)的值为：
A．1
B．5
C．4
D．2
参考答案和解析
无数次
更多 “5、有以下程序段： INTEGER A（5),T DATA A/1，2，3，4，5/ DO I=1，2 T=A（I) A（I)=A（6-I) A（6-I)=T ENDDO PRINT*, A（5) END 执行以上程序后，输出的A（5)的值为：A．1B．5C．4D．2” 相关考题
考题
有以下程序main(){ int i,t[][3]={9,8,7,6,5,4,3,2,1};for(i=0;i3;i++) printf(" ％ d",t[2-i][i]);}程序执行后的输出结果是A)7 5 3B)3 5 7C)3 6 9D)7 5 1
考题
有以下程序： void f(int a[],int i,int j) { int t; if(i＜j) { t=a[i];a[i]=a[j];a[j]=t; f(a,i+1,j-1); } } main() { int i，aa[5]={1,2,3,4,5}; f(aa,0,4); for(i=0;i＜5;i++) printf("%d,",aa[i]); printf("\n"); } 执行后输出结果是( )。A．5,4,3,2,1，B．5,2,3,4,1，C．1,2,3,4,5，D．1,5,4,3,2，
考题
执行以下程序段 Dim i As Integer,X As Integer x=0 For i=20 To 1 Step -2 x=x+i\5 Next Print x 后,x的值为______。A． 16B．17C．18D．19
考题
以上程序段运行的结果是：______. Dim a(-1 To 5) As Boolean Dim flag As Boolean flag = False Dim i As Integer Dim j As Integer Do Until flag = True For i = -1 To 5 j=j+1 if a(i)= False Then a(i)= True Exit For End If If i = 5 Then flag = True End If Next Loop Print jA．20B．7C．35D．8
考题
以下程序段运行的结果是： ______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For i=-1 To 5 j=j+1 If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print jA．20B．7C．35D．8
考题
下面运行程序后,单击命令按钮,输出的结果是 【 】 。Private Sub Command1_Click()Dim a%(1 To 5),i%, s#For i=1 To 5a(i)=iNexts=Fun(a)Print "s="; s;End SubFunction Fun(a() As Integer)Dim t#, i%t=1For i=LBound(a) To UBound(a)t=t a(i)NextFun=tEnd Function
考题
在窗体上画一个名称为Commmld1的命令按钮，编写如下事件过程Private Sub Command1 Click()Dim a As Stringa=______For i = 1 To 5Print Space(6-i)；Mid$(a， 6-i， 2*i-1)Next iEnd Sub程序运行后，单击命令按钮，要求窗体上显示的输出结果为5456345672345678123456789请填空。
考题
有以下程序:include main( ){int i,t[ ] [3] = {9,8,7,6,5,4,3,2,1};for(i=0;i
有以下程序:#include ＜stdio.h＞main( ){int i,t[ ] [3] = {9,8,7,6,5,4,3,2,1}; for(i=0;i＜3;i++) printf("%d ",t[2-i]l-i]);}程序执行后的输出结果是( )。A．7 5 3B．3 5 7C．3 6 9D．7 5 1
考题
下列程序段的执行结果为______。 Dim M(10), N(10) I=3 For T = 1 To 5 M(T) = T N(I) = 2 * I + T Next T Print N(I)； M(I)A． 3 11B．3 15C．11 3D．15 3
考题
有以下程序:include void f(int a[],int i, int j){int t; if(i
有以下程序： #include ＜stdio.h＞ void f(int a[],int i, int j) { int t; if(i＜j) { t=a[i];a[i]=a[j];a[j]=t; f(a,i+1,j-1); } } main() { int i,aa[5]={1,2,3,4,5}; f(aa,0,4); for(i=0;i＜5;i++) printf("%d,",aa[i]);printf("\n"); } 执行后的输出结果是( )。A．5,4,3,2,1,B．5,2,3,4,1,C．1,2,3,4,5,D．1,5,4,3,2,
考题
现有如下程序： Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer) If x＞=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序，则窗体上显示的是( )。A．38B．49C．61D．70
考题
下面程序段，运行后的结果是 Private Sub Commandl_Click( ) Dim b%(1 To 4)，i%，t# For i=1 To 4 b(i)=i Next i t=Tof(b( ) ) Print"t="；t， End Sub Function Tof(a() As Integer) Dim t#，i% t=1 For i=2 To UBound(A)t=t * a(i) Next i Tof=t End FunctionA．t=18B．t=24C．t=30D．t=32
考题
有下面的程序段，其功能是按图1所示的规律输出数据： Dim a(3，5)As Integer For i=1 To 3 For j=1 To 5 a(i，j)=i+j Print a(i，j)； Next Print Next若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是（ ）。A.For i=1 To 5 For j=1 To 3 Print a(j，i)； Next Print NextB.For i=1 T0 3 For j=1 To 5 Print a(j，i)； Next Print NextC.For j=l To 5 For i=1 To 3 Print a(j，i)； Next Print NextD.For i=1 To 5 For=1 To 3 Print a(i，j)： Next Print Next
考题
下面运行程序后，单击命令按钮，输出出的结果是【 】。Private Sub Command1_Click( )Dim a% (1 To 5) ,i%, sFor i = 1 To 5a(i) =iNexts = Fun(a)Print"s="; s;End SubFunction Fun(a() As Integer)Dim t, i%t=1For i = LBound(A0To UBound(a)t=t * a(i)NextFun =tEnd Function
考题
下列程序段的运行结果是( )。 Subsele() Dim n As Integer i=21:n=3 Do While i＞n i=i-n Loop Print i End SubA．2B．4C．5D．3
考题
下面程序段，运行后的结果是 Private Sub Command1_Click() Dim b%(1 To 4)，i%，t# For i=1 To 4 b(i) =i Next t=Tof(b() ) Print"t="；t， End Sub Function Tof(a() As Integer) Dim t#,i% t=1 For i=2 To UBound(a) t=t*a(i) Next Tof=t End FunctionA．t=18B．t=24C．t=30D．t=32
考题
有以下程序 void f(int a[ ],int i,int j) { int t; if(i＜j) { t=a[i]; a[i]=a[j];a[j]=t; f(a,i+1,j-1); } } main( ) { int i,aa[5]={1,2,3,4,5}; f(aa,0,4); for(i=0;i＜5;i++) printf(“%d,”,aa[i]); printf(“\n”); } 执行后输出结果是（ ）A．5,4,3,2,1,B．5,2,3,4,1,C．1,2,3,4,5,D．1,2,3,4,5,
考题
单击一次命令按钮之后，下更程序代码的执行结果为______ 。 Public Sub Proc(a() As Integer) Static i As Integer Do a(i) = a(i) + a(i + 1) i=i+1 Loop While i ＜ 2 End Sub Private Sub Command1_Cliek() Dim m As Integer Dim i As Integer Dim x(10) As Integer For i = 0 To 4 x(i) = i + 1 Next i For i = 1 To 2 Call Proc (x) Next i For i = 0 To 4 Print x(i); Next i End SubA．3 4 7 5 6B．3 5 7 4 5C．1 2 3 4 5D．1 2 3 5 7
考题
有下面的程序段，其功能是按图1所示的规律输出数据：Dim a(3，5)As Integer For i=1 To 3For j=1 To 5a(i，j)=i+jPrint a(i，j)；NextPrintNext若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是（ ）。A.For i=1 To 5For j=1 To 3Print a(j，i)；NextPrintNextB.For i=1 T0 3For j=1 To 5Print a(j，i)；NextPrint NextC.For j=l To 5For i=1 To 3Print a(j，i)；NextPrintNextD.For i=1 To 5For=1 To 3Print a(i，j)：NextPrintNext
考题
下列程序段的运行结果是( )。 Sub sele() Dim n As Integer i=21: n=3 Do While i ＞ n i=i-n Loop Print i End SubA．2B．4C．5D．3
考题
在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。 Option Base 1 Private Sub fun (a()As Integer，n As Integer) For i=1 To 2 t=a(i)：a(i)=a(5-i+1)：a(5-i+1)=t Next i End Sub Private Sub Command1_Click() Dim arr1(5)As Integer For i=1 To 5 arr1(i)=i Next i Call fun(arr1，5) Print arr1(1)；arr1(2) End SubA．1 2B．2 1C．5 4D．4 5
考题
下列程序段的执行结果为( )。 Dim m(10),n(10) I=3 For I=1 to 5 M(t)=t N(I)=2*I+t Next t Print n(I);m(I)A．3 11B．3 15C．11 3D．15 3
考题
有以下程序： Void f(int a[]，iht i，int j) { int t； if(i＜j) { t=a[i]； a[i]=a[j]； a[j]=t； f(a，i+1，i-1)； } } main() { int i，aa[5]={1，2，3，4，5}； f(aa，0，4)； for(i=0；i＜5；i++) printf("%d" ,aa[i])；printf("\n")； } 执行后输出结果是A．5,4，3，2，1，B．5,2，3，4，1，C．1,2，3，4，5，D．1,5，4，3，2，
考题
下列程序段的执行结果为______。 Dim m(3,3)As Integer Dim i As Integer Dim j As Integer Dim x As Integer For i=1 To 3 m(i,i)=i Next For i=0 T0 3 For j=0 To 3 x=x+m(i, j) Next Next Print xA．3B．4C．5D．6
考题
有以下程序 void f(int a[],int i,int j) { int t; if(i＜j) { t=a[i];a[i]=a[j];a[j]=t; f(a,i+1,j-1)； } } main() { int i,aa[5]={1,2,3,4,5}； f(aa,0,4)； for(i=0;i＜5;i++)printf("%d,",aa[i];printf("\n")； } 执行后输出结果是A．5，4，3，2，1B．5，2，3，4，1，C．1，2，3，4，5D．1，5，4，3，2，
考题
下面程序运行后，单击命令按钮，输出的结果是______。Private Sub Command1_Click()Dim a%(1 To 5)，i%，sFor i=1 To 5a(i) =iNexts=Fun(A)Print "s="；s；End SubFunction Fun(a() As Integer)Dim t，i%t=1For i=LBound(A)To UBound(A)t=t*a(i)NextFun=tEnd Function
热门标签
最新试卷