编写程序,交换数组a和数组b中的对应元素。
第1题
Private Sub Commnd1_Click()
Dim a(1 To 10)As Integer
Dim i As Integer
Dim p As Integer
Dim t As Integer
Dim j As Integer
For i=1 To 10
a(i)=i
Next i
For j=1 To 5
【 】
【 】
【 】
Next j
For i=1 To 10
Print a(i)
Next i
End Sub
第2题
Private Sub OrderChange(a())
Dim i As Integer, Temp As Integer
For i = 1 To 4
Temp = a(i)
______
______
Next i
End Sub
第3题
Option Base 1
Private Sub Command1_Click()
Dim a()
a=Array(678,45,324,528,439,387,87,875,273,823)
Fori=【 】
Forj= 【 】
If a(j)【 】a(j+1)Then
a1=a(j)
a(j)=a(j+1)
a(j+1)=al
End lf
Nextj
Next i
For i=1 To 10
Print a(i)
Next i
End Sub
第4题
Private Sub Backward(a())
Dim i As Integer,Tmp As Integer
Fori=1 To5
Tmp=a(i)
a(5-i)=Tmp
Nexti
End Sub
第5题
例如,输入“33,67,42,58,25,76,85,16,41, 56”,则输出“33,67,42,58,25,76,16,85,41,56”。
注意;部分源程序给出如下。
请勿改动主函数main和其他函数中的任何内容,仅在函数fun()的横线上填入所编写的若干表达式或语句。
试题程序:
include <stdio. h>
define N 10
void fun(int aa[])
{
int i, j, t;
int max=0, min=0;
for(i=0; i<N; i++)
{
if(【 】)
max=i;
if(【 】)
min=i;
}
t=aa [max];
【 】;
aa [min] =t;
}
main()
{
int i;
int aa [N] ={33, 67, 42,58,25, 76, 85,16, 41, 56};
clrscr ();
printf("\n*** original list ***\n");
for(i=0; i<N; i++)
printf ("%4d", aa [i] );
fun (aa);
printf ("\n*** new list ***\n");
for(i=0; i<N; i++)
printf ("%4d", aa [i]);
}
第6题
A. a(j)=a(11-j) a(11-j)=t
B. a(11-j)=a(j) a(j)=t
C. a(j)=a(11-j) a(j)=t
D. a(11-j)=t a(j)=a(11-j)
第7题
A.a(j)=a(11-j) a(11-j)=t
B.a(11-j)=a(j) a(j)=t
C.a(j)=a(11-j) a(j)=t
D.a(11-j)=t a(j)=a(11-j)
第8题
A.1,1
B.1,2
C.2,2
D.2,1
第9题
A.1,1
B.1,2
C.2,2
D.2,l
第10题
A.1,1
B.1,2
C.2,2
D.2,1
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!