假如已有如下定义的数组,利用循环在数组中找出最小值,________是正确的。 Dim s(9) As Integer, i% For i = 0 To 9 s(i) = Int(Rnd() * 89 + 10) NextA.Dim min As Integer For i = 0 To 9 If s(i) > min Then min = s(i) End If Next Label1.Text = "最小值是:" min#B.Dim min As Integer min = s(0) For i = 1 To 9 If s(i) > min Then min = s(i) End If Next Label1.Text = "最小值是:" min#C.Dim min As Integer min = s(9) For i = 0 To 9 If s(i) < min Then min = s(i) End If Next Label1.Text = "最小值是:" min#D.Dim min As Integer For i = 0 To 9 If s(i) < min Then min = s

假如已有如下定义的数组,利用循环在数组中找出最小值,________是正确的。 Dim s(9) As Integer, i% For i = 0 To 9 s(i) = Int(Rnd() * 89 + 10) Next

A.Dim min As Integer For i = 0 To 9 If s(i) > min Then min = s(i) End If Next Label1.Text = "最小值是:" & min#B.Dim min As Integer min = s(0) For i = 1 To 9 If s(i) > min Then min = s(i) End If Next Label1.Text = "最小值是:" & min#C.Dim min As Integer min = s(9) For i = 0 To 9 If s(i) < min Then min = s(i) End If Next Label1.Text = "最小值是:" & min#D.Dim min As Integer For i = 0 To 9 If s(i) < min Then min = s
参考答案和解析
A

相关考题:

以下程序的功能是:求出数组 x 中各相邻两个元素的和依次存放到 a 数组中,然后输出。请填空。main( ){ int x[10],a[9], i ;for (i=0;i10;i++)scanf("%d",x[i]);for( 【 14 】 ;i10;i++)a[i-1]=x[i]+ 【 15 】 ;for(i=0;i9;i++) printf("%d",a[i]);printf("\n");}

下面程序的运行结果是()。includevoid del(char*s){int i,j;char *a;a=s;for(i=0,j=0;a 下面程序的运行结果是( )。 #include<stdio.h> void del(char*s) { int i,j; char *a; a=s; for(i=0,j=0;a[i]!='\0';i++) { if(a[i]>='0'a[i]<='9') { s[j]=a[i]; j++; } s[j]='\0'; }} main() {char s[]="aa89gggh"; del(s); printf("\n%s",s); }A.aaB.89C.ggghD.aa89gggh

在窗体上画—今名称为Cmmand1的命令按钮,然后编写如下事件过程 Option Base 1 Private Sub Command1_Click() Dim a(5,5)As Integer For i=1 To 5 For j=1 To 5 a(i,j)=(i+j)*5\10 Next j Next i s=0 For i=1 To 5 s=s+a(i,i) Next i Print s End SubA.15B.13C.11D.9

主程序调用findmax函数求出数组中最大元素在数组中的下标,括号中需填写的内容是 #include<stdio.h> findmax(int*s,int t,int*k) { int p; for(p=0,*k=p;p<t;p++)if(s[p]>s[*k])( );} main() { int a[10],i,k; for(i=0;i<10;i++)scanf("%d",a[i]); findmax(a,10,k); printf("A.k=pB.*k=pC.k=p-sD.*k=p-s

(35)有下列程序代码实现生成20个0-100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段 ,完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=________ Text1.Text=Text1.Textarr(i)Chr(13)Chr(10) Next i Sum=0 For Each X________ If X50 Then Print Tab(20);X Sum=Sum+X End If Next X Print Tab(20);"Sum=";Sum End SubA.Int(Rnd*99+1) In arr B.Int(Rnd) In arr C.Int(Rnd*99+1) In arr() D.Int(Rnd) In arr()

现有如下定义语句int*p,s[20],i;p=s;表示数组元素s[i]的表达式不正确的是A.*(s+i)B.*(p+i)C.*(s=s+i)D.*(p=p+i)

有如下语句,执行后该段语句的循环次数是()。 Dim s,I,j as integer For I =1 to 3 For j=3 To 1 Step-1 S=I*j Next j Next I A. 3B. 4C. 9D. 10

若已定义,以下fun函数的功能是:在第一个循环中给前10个数组元素依次赋1、2、3、 4、5、6、7、8、9、10;在第二个循环中使a数组前10个元素中的值对称折叠,变成1、 2、3、4、5、5、4、3、2、1。请填空。fun( int a[]){int i,for(i=1;i<=10;i++) 【 】=i;for(i=0;i<5;i++) 【 】=a[i];}

设有如下程序: Option Base 1 Private Sub Command1 Click() Dim a(10) As Integer Dim n As Integer n=InputBox(“输入数据”) If n< 10 Then Call,GetArray(a, n) End If End Sub Private Sub GetArray(b() As Integer, n As Integer) Dim c(10)As Integer j=0 For i=1 To n b(i)=CInt(Rnd()*100) If b(i) /2 =b(i) \2 Then j=j + 1 c(j) = b(i) End If Next Print j End Sub 以下叙述中错误的是A.数组b中的偶数被保存在数组c中B.程序运行结束时,在窗体上显示的是c数组中元素的个数C.GetArray过程的参数n是按值传送的D.如果输入的数据大于10,则窗体上不显示任何信息

有如下函数过程: Function lj(x As Integer) As Long Dim s As Long Dim i As Integer s=0 For i = 1 To x s=s+ i Next i 1j= s End Function在窗体上添加一个命令按钮,名为Command1, 编写事件过程调用该函数: Private Sub Command1 Click() Dim i As Integer Dim sum As Long For i = 1 To 5 sum = sum + 1j(i) Next i Print sum End SubA. 25B.35C.45D.55

以下程序的功能是:先将随机产生的10个不同的整数放人数组a中,再将这10个数按升序方式输出。请填空。Private Sub Form. Click()Dim a(10)As Integer,i AS IntegerRandomizei=0Donum=Int(Rnd*90)+10For j=1 To i 检查新产生的随机数是否与以前的相同,相同的无效If num=a(j)ThenExit ForEnd IfNextjIfji Theni=i+1a(i)=End IfLoop Whilei10For i=1 To 9For j= To 10If a(i)a(j)Then temp=a(i):a(i)一a(j):NextjNext iFor i=1 To 10Print a(i)Next iEnd Sub

下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段是( ),完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=______ Textl.Text=Textl.Text arr(i) Chr(13) Chr(10) Next i Sum=0 For Each X ______ If X>50 Then Print Tab(20);X Sum=Sum+X End If Next X Print Tab(20);"Sum=";Sum End SubA.Int(Rnd*99+1) In arrB.Int(RnD)In arrC.Int(Rnd*99+1) In arr()D.Int(RnD)In arr()

以下程序中函数reverse的功能是将a所指数组中的内容进行逆置。 void reverse(int a[],int n) { int i,t; for(i=0;i<n/2;i++) { t=a[i];a[i]=a[n-1-i];a[n-1-i]=t;} } main() { int b[10]={1,2,3,4,5,6,7,8,9,10};int i,s=0; reverse(b,8); for(i=6;i<10;i++)s+=b[i]; printf(“%d\n”,s); } 程序运行后的输出结果是A.22B.10C.34D.30

要求产生10个随机整数,存放在数组Arr中,从键盘输入要删除的数组元素的下标,将该元素中的数据删除,后面元素中的数据依次前移,并显示删除后剩余的数据,现有如下程序:Option base 1Private Sub Command1_Click()Dim arr(10)as integerFor i=1 to 10 ‘循环1Arr(i)=int(rnd*100)Print arr(i);NextX=inputbox(“输入1-10的一个整数:”)For i=x+1 to 10 ‘循环2Arr(i-1)=arr(i)NextFor i=1 to 10 ‘循环3Print arr(i);NextEnd Sub程序运行后发现显示的结果不正确,应该进行的修改是A)产生随机数时不使用int函数B)循环2的初始值应为i-xC)数组定义改为Dim a(11)as integerD)循环3的循环终值应改为9

23 有如下程序段,该程序段循环的次数是______。 Dim i As Integer Dim j As Integer Dim k As Integer k=0 For i = 0 To 10 Step 3 For j = 1 To 5 If j > 3 Then k = k + 4: Exit For k=k+1 Print k Next j If i > 8 Then Exit For Next iA.9B.10C.11D.12

下列程序中函数reverse()的功能是将a所指数组中的内容进行逆置。includevoidreverse(in 下列程序中函数reverse()的功能是将a所指数组中的内容进行逆置。 #include<stdio.h> void reverse(int a[], int n) { int i,t; for(i=0;i<n/2;i++) { t=a[i];a[i]=a[a-1-i];a[n-1-i]=t;} main() { int b[10]={1,2,3,4,5,6,7,8,9,10};int i,s=0; reverse(b,10); for(i=0;i<3 ;i++) s+=b[i]; printf("%d\n",s); } 程序运行后的输出结果是( )。A.27B.6C.25D.30

程序段如下: Dim i As Integer,s As Integer For i=4 To 1 Step-1 s=s+i Next i Print s,i执行的结果是( )。A.10 0B.9 1C.10 1D.9 0

设有如下程序: Option Base 1 Private Sub Command1_Click( ) Dim a(10) As Integer Dim n As Integer n=InputBox(“输入数据”) If n10 Then Call GetArray(a,n) End If End Sub Private Sub GetArray(b( )As Integer,n As Integer) Dim c(10) As Integer j=0 For i=1 To n b(i)=CInt(Rnd( )*100) If b(i)/2=b(i)\2 Then j=j+1 c(j)=b(i) End If Next Print j End Sub以下叙述中错误的是A.数组b的偶数被保存在数组c中B.程序运行结束时,在窗体上显示的是c数组中元素的个数C.GetArray过程的参数n是按值传送的D.如果输入的数据大于10,则窗体上不显示任何信息

定义变量和数组如下:int i;int x[3][3]=(1,2,3,4,5,6,7,8,9);则语句for(i=0;i<3;i++)printf(”%d”,x[1][2-i]);的输出结果是 ( )

以下程序中函数reverse的功能是对a所指数组中的内容进行逆置。 void reverse(int a[], int n) { int i, t; for(i=0; i<n/2; i++) {t=a[i]; a[i]=a[n-1-1]; a[n-1-i]=t;} } main() { int b[10]={1, 2, 3, 4, 5, 6, 7, 8, 9, 10}; int i, s=0; reverse(b, 8); for(i=6; i<10; i++) s+=b[i]; printf("% d\n", s); } 程序运行后的输出结果是______。A.22B.10C.34D.30

程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3,3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i,j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i,1) Next i Print s End SubA.32B.28C.30D.36

编写如下事件过程: Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后,单击窗体,则窗体上显示的内容是A.6B.12C.24D.47

已知数组a(1 To 10)As Integer,下面调用GetValue函数正确的是( )。 Private Function GetValue(a()As Integer)As Integer For i=1 To 10 Get Value=GetValue+a(i) Next i End FunctionA.S=GetValue(a(1 To 10))B.S=GetValue(a)C.S=GetValue(a(10))D.S=GetValue a

下列程序中函数reverse()的功能是将a所指数组中的内容进行逆置。 include void reverse 下列程序中函数reverse()的功能是将a所指数组中的内容进行逆置。#include<stdio.h>void reverse(int a[],iht n){ int i,t;for(i=0;i<n/2;i++){ t=a[i];a[i]=a[n-1-i];a[n-1-i]=t;}}main(){ int b[10]={1,2,3,4,5,6,7,8,9,10};int i,s=0;reverse(b,10) ;for(i=0;i<3;i++)s+=b[i];printf("%d\n",s);}程序运行后的输出结果是( )。A.27B.6C.25D.30

要求生产10个随机整致,存放在数组arr中。从键盘输入要删除的数组元素的下标,将该元素中的数据删除,后面元素中的数据依次前移,并显示删除后剩余的数据。现有如下程序:Option Base 1Privare Sub Command1 Click( )Dim arr(10)As IntegerFor i=1To 10循环1Arr(i),=Int(Rnd*100)Print arr(i);Next ix=InputBox(输入1—10的一个整数:)For i=X+1 To 10循环2arr(i-1)=arr(i)Next iFor i=x-1 To 10 循环3Print arr(i)Next iEnd Sub程序运行后发现显示的结果不正确,应该进行的修改是( )。A.产生随机数时不使用Int函数B.循环2的初值应为i= xC.数组定义改为Dim a(11)As IntegerD.循环3的循环终值应改为9

试题14以下程序调用fun函数把x中的值插入到a数组下标为k的数组元素中。主函数中,n存放a数组中数据的个数。请填空。#include stdio.hvoid fun(int s[], int *n, int k, int x){ int i;for(i=*n-1; i=k; i- - ) s[ ___ ]=s[i];s[k]=x;*n=*n+______;}main(){ int a[20]={1,2,3,4,5,6,7,8,9,10,11}, i, x=0, k=6, n=11;fun(a, n, k, x);for(i=0; in; i++) printf(“%4d”,a[i]); printf(“\n”);}

(8)以下程序的功能是:先将随机产生的10个不同的整数放入数组a中,再将这10个数按升序方式输出。请填空。Private Sub Form_Click()Dim a(10) As Integer, i As IntegerRandomizei=0Donum=Int(Rnd*90)+10For j=1To i ' 检查新产生的随机数是否与以前的相同,相同的无效If num=a(j)ThenExit ForEnd IfNext jIf j>i Theni=i+1a(i)=【10】End IfLoop While i<10For i=1 To 9For j=【11】To 10If a(1)>a(j)Then temp=a(i):a(i) = a(j):【12】Next jNext iFor i=1To10Print a(i)Next iEnd Sub

有数组定义语句:dim I(99,99) as Integer,则数组I中共包含有()个元素。