2009年4月上机100套题51-60 第五十一套
给定程序的功能是:将n个人员的考试成绩进行分段统计,考试成绩放在数组a中,各分段的人数存到数组b中:成绩为60到69的人数存到b[0]中,成绩为70到79的人数存到b[l],成绩为80到89的人数存到b[2],成绩为90到99的人数存到b[3],成绩为100的人数存到b[4],成绩为60分以下的人数存到b[5]中。
例如,当数组a中的数据是:93、85、77、68、59、43、94、75、98。调用该函数后,数组b 中存放的数据应是:l、2、l、3、0、2。
注意:部分源程序给出如下。
请勿改动main函数和其他函数中的任何内容,仅在横线上填入所编写的若干表达式或语句。
试题程序:
#include
# define N 50
# define M 11
void fun(int a[], int b[],int n)
{
int i;
for(i=0;i<6;i++)
b[i]=0;
for(i=0;i<【1】;i++)
if(a[i]<60)
b[5]++;
【2】
b[(a[i]-60)/10]++;
}
main()
{
int i,a[100]={93,85,77,68,59,43,94,75,98},b[6];
fun(【3】,9);
printf("The resul\t is: ");
for(i=0;i<6;i++)
printf("%d ",b[i]);
printf("\n");
}
【参考答案】 (1) n (2) else (3) a,b
【考点分析】
本题考查:for循环语句;if…else语句;函数调用。
【解题思路】
填空1:显然这个循环的次数和人员的个数有关,应填入n。
填空2:当a[i]<60,统计不及格的个数,相反则存入其他数组中,这里填入的是else。
填空3:根据函数传递规则,应给传递2个元素,很显然为a,b。
下列给定程序中,函数fun的功能是:求整数x的y次方的低3位值。例如,整数5的6次方为15625,此值的低3位值为625。
请改正程序中的错误,使它能得出正确的结果。
注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。
试题程序:
#include
long fun(int x, int y, long *p)
{ int i;
long t=1;
/*************found**************/
for(i=1;i t=t*x; *p=t; /*************found**************/ t=t/1000; return t; } void main() { long t, r; int x, y; printf("\nInput x and y: "); scanf("%1d%1d",&x,&y); t=fun(x,y,&r); printf("\n\nx=%d, y=%d,r=%ld, last=%ld\n\n ",x, y, r,t); } 【参考答案】 (1)错误:for(i=1;i 正确:for(i=1;i<=y;i++) (2)错误:t=t/1000; 正确:t=t%1000; 【考点分析】 本题考查:for循环语句,注意根据题目要求确定循环变量的取值范围;区别求余和除法运算。 【解题思路】 我们先用简单的思路理解一下该程序,如果当x=y=1时,程序的问题就很简单,所以for( )的循环条件应该是for(i=1;i<=y;i++),另外,t=t/1000中的错误是混淆了"/"和"%"的定义,这样的细节问题务必要引起大家注意。 请编写函数fun,该函数的功能是:将s所指字符串中ASCII值为偶数的字符删除,串中剩余字符形成一个新串放在t所指的数组中。 例如,若s所指字符串中的内容为ABCDEFG12345,其中字符B的ASCII码值为偶数、……、字符2的ASCII码值为偶数、……,都应当删除,其他依次类推。最后t所指的数组中的内容应是ACEG135。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的花括号中填入所编写的若干语句。 试题程序: #include #include #include #include void fun(char *s, char t[]) { } void main() { FILE *wf; char s[100],t[100]; system("CLS"); printf("\nPlease enter string S: "); scanf("%s",s); fun(s,t); printf("\nThe result is :%s\n",t); /******************************/ wf=fopen("out.dat","w"); fun("ABCDEFG12345",t); fprintf(wf,"%s",t); fclose(wf); /*****************************/ } 【参考答案】 void fun(char *s, char t[]) { int i=0; for(;*s!='\0';s++) /*找出ASCII值为奇数的字符依次存入数组t中*/ if(*s%2==1) t[i++]=*s; t[i]= '\0'; /*在字符串的末尾加上串结束符*/ } 【考点分析】 本题考查:for循环语句;指针型变量;字符串结束标识,ASCII码奇数或偶数判定方法。 【解题思路】 删除ASCII值为偶数的字符,也就是要留下ASCII值为奇数的字符,由于最终是要求求出剩余字符(即ASCII值为奇数)形成的新串,所以本题程序的算法是对原字符串从头到尾扫描,并找出ASCII值为奇数的字符依次存入数组t中。此外,还要注意数组t的下标变化和下标的初值(初值必须为0,即i=0),t[i++]的作用是先使用t[i],然后再使i自增1。任何字符串的末尾都要有串结束符。这种算法在很多题中都要用到,学习者可以举一反三地找一些其他相关习题练习一下。 第五十二套 给定程序中,函数fun的功能是:将s所指字符串中的所有数字字符移到所有非数字字符之后,并保持数字字符串和非数字字符串原有的次序。 例如,形参s所指的字符串为:def35adh3kjsdf7。执行结果为:defadhkjsdf3537。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的横线上填入所编写的若干表 达式或语句。 试题程序: #include void fun(char *s) { int I,j=0,k=0; char t1[80],t2[80]; for(I=0;s[I]!='\0';I++) if(s[I]>='0' && s[I]<='9') { t2[j]=s[I]; 【1】; } else { t1[k++]=s[I]; } t2[j]=0; t1[k]=0; for(I=0;I 【2】; for(I=0;I<【3】;I++) s[k+1]=t2[I]; } main() { char s[80]="ba3a623jfi7tk7v"; printf("\nThe original string is: %s\n",s); fun(s); printf("\nThe result is:%s\n",s); } 【参考答案】 (1) j++或j+=1或++j或j=j+1 (2) s[i]=t1[i] (3) j 【考点分析】 本题考查:指针型变量;数组变量赋值;for循环语句。 【解题思路】 填空1:根据函数fun中的内容可知,t1存储了s中的非数字字符,t2存储了s中的数字字符,为了存储下一个数字,j要加1。 填空2:分开s中的数字与非数字后,要先将非数字放入字符串s中,那么填入s[i]=t1[i]。 填空3:将数字字符加到s之后,并且i要小于数字的个数j。 下列给定程序中,函数fun的功能是:首先把b所指字符串中的字符按逆序存放,然后将a所指字符串中的字符和b所指字符串中的字符,按排列的顺序交叉合并到c所指数组中,过长的剩余字符接在c所指数组的尾部。例如,当a所指字符串中的内容为abcdefg,b所指字符串中的内容为1234时,c所指数组中的内容应该为a4b3c2d1efg;而当a所指字符串中的内容为1234,b所 指字符串中的内容为abcdefg时,c所指数组中的内容应该为1g2f3e4dcba。 请改正程序中的错误,使它能得出正确的结果。 注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。 试题程序: #include #include #include #include void fun(char *a, char *b, char *c) { int i, j; char ch; i=0; j=strlen(b)-1; /*************found**************/ while (i>j) {ch=b[i]; b[i]=b[j]; b[j]=ch; i++; j--; } while (*a||*b) { if (*a){*c=*a; c++; a++;} if(*b){*c=*b; c++; b++;} } /*************found**************/ *c=0 ; } void main() { char s1[100],s2[100],t[200]; system("CLS"); printf("\nEnter s1 string: "); scanf("%s",s1); printf("\nEnter s2 string: "); scanf("%s",s2); fun(s1,s2,t); printf("\nThe result is :%s\n",t); } 【参考答案】 (1)错误:while(I>j) 正确:while(i (2)错误:*c=0; 正确:*c='\0'; 【考点分析】 本题考查:while循环语句;字符串结束标识表示方法。 【解题思路】 这是一个字符串处理的较为混合的程序,将字符串倒序存放的方法一般是以字符串中央为中点,将两边对称位置的字符互相交换。可利用循环语句实现,但必须要注意两边对称位置元素的下标。该题是用指针配合循环嵌套实现解题目的的。 请编写一个函数void fun (char a[ ], charb[ ], int n),其功能是:删除一个字符串中 指定下标的字符。其中,a指向原字符串,删除后的字符串存放在b所指的数组中,n中存放指定的下标。 例如,输入一个字符串world,然后输入3,则调用该函数后的结果为word。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的花括号中填入所编写的若干语句。 试题程序: #include #include #include #define LEN 20 void fun (char a[ ], char b [ ], int n) { } void main ( ) { FILE *wf; char strl[LEN], str2[LEN]; int n ; system("CLS"); printf ("Enter the string : \n") ; gets (strl) ; printf ("Enter the position of the string deleted: ") ; scanf ("%d", &n) ; fun (strl, str2, n) ; printf ("The new string is : %s \n", str2) ; /******************************/ wf=fopen("out.dat","w"); fun("world",str2,3); fprintf(wf,"%s",str2); fclose(wf); /*****************************/ } 【参考答案】 void fun (char a[ ], char b[ ], int n) { int i,k=0; for(i=0;a[i]!='\0';i++) if(i!=n) /*将不是指定下标的字符存入数组b中*/ b[k++]=a[i]; b[k]='\0'; /* 在字符串最后加上结束标记*/ } 【考点分析】本题考查:删除字符串中指定字符,对于此类题目,我们一般采用保留非指定字 符的操作。 【解题思路】 本题要求删除字符串中指定下标的字符,即把不是指定下标的字符留下,所以要用if(i!=n),注意不能写成"=="运算。 第五十三套 请补充函数fun,该函数的功能是:按"0"到"9"统计一个字符串中的奇数数字字符各自出现的次数,结果保存在数组num中。 注意:不能使用字符串库函数。 例如,输入"x=112385713.456+0.909*bc",结果为:1=3,3=2,5=2,7=1,9=2。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的横线上填入所编写的若干表达式或语句。 试题程序: #include #include #define N 1000 void fun(char *tt,int num[]) { int I,j; int bb[10]; char *p=tt; for(I=0;I<10;I++) { num[I]=0; bb[I]=0; } while(【1】) { if(*p>='0'&&*p<='9') 【2】; p++; } for(I=1,j=0;I<10;I=I+2,j++) 【3】; } void main() { char str[N]; int num[10],k; system("CLS"); printf("\nPlease enter a char string:"); gets(str); printf("\n**The original string**\n"); puts(str); fun(str,num); printf("\n**The number of letter**\n"); for(k=0;k<5;k++) { printf("\n"); printf("%d=%d",2*k+1,num[k]); } printf("\n"); } 【参考答案】 (1) *p (2) bb[*p-'0']++ (3) num[j]=bb[i] 【考点分析】本题考查:while循环语句;if语句判断需要保存的字符,并通过数组元素的赋值操作来完成。 【解题思路】填空1:通过移动指针p指向字符串tt中的各个字符,当指针p所指的字符为"\0"时,即指向字符串tt的最后一个字符,while循环结束。 填空2:将字符串中的数字字符"0"到"9"的个数都保存在数组bb[10]中。*p-'0'实现将字符"0"的个数保存在bb[0]中,将字符"1"的个数保存在bb[1]中,依此类推,直到将字符"9"的个数保存在bb[9]中。 填空3:由于奇数数字字符的个数存于bb[1]、bb[3]、 bb[5]、 bb[7]、bb[9]中,所以for 循环的目的是将这些元素分别赋给num[0]、num[1]、num[2]、num[3]、num[4]。 下列给定程序中,函数fun的功能是:根据以下公式求π的值,并作为函数值返回。例如,给指定精度的变量eps输入0.0005时,应当输出Pi=3.140578。 π/2=1+1/3+1/3*2/5+1/3*2/5*3/7+1/3*2/5*3/7*4/9??? 请改正程序中的错误,使它能得出正确的结果。 注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。 试题程序: #include #include #include double fun(double eps) {double s,t; int n=1; s=0.0; /*************found**************/ t=1; /*************found**************/ while(t>eps) { s+=t; t=t*n/(2*n+1); n++; } /*************found**************/ return (s); } void main() { double x; printf("\nPlease enter a precision: "); scanf("%lf",&x); printf("\nPi=%1f\n ",fun(x)); } 【参考答案】 (1)错误:t=1; 正确:t=1.0; (2)错误:while(t>eps) 正确:while(t>=eps) (3)错误:return(s); 正确:return(s*2); 【考点分析】 本题考查:根据给定公式求值,因此需要确定变量数据类型及如何初始化;while循环条件的确定。 【解题思路】 该题中,我们首先看函数fun中while语句的含义,当新的一项大于给定参数时,循环累加。根据题意我们可以看出,最后一项应该小于给定参数,因此,循环条件应当为while(t>=eps)。至于return(s);错误,是一个数学常识,应该是return(s*2);。 请编写函数fun,其功能是:将s所指字符串中下标为偶数的字符删除,串中剩余字符形成的新串放在t所指数组中。 例如,当s所指字符串中的内容为ABCDEFGHIJK,则在t所指数组中的内容应是BDFHJ。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的花括号中填入所编写的若干语句。 试题程序: #include #include #include #include void fun(char *s,char t[]) { } void main() { FILE *wf; char s[100],t[100]; system("CLS"); printf("\nPlease enter string S: "); scanf("%s",s); fun(s,t); printf("\nThe result is:%s\n ",t); /******************************/ wf=fopen("out.dat","w"); fun("ABCDEFGHIJK",t); fprintf(wf,"%s",t); fclose(wf); /*****************************/ } 【参考答案】 void fun(char *s,char t[]) { int i,j=0,k=strlen(s);/*k为字符串的长度*/ for(i=1;i /*将s所指字符串中下标为奇数的字符存入t所指字符串中*/ t[j++]=s[i]; t[j]='\0'; /*在字符串最后加上结束标志*/ } 【考点分析】 本题考查:删除字符串中指定字符,一般采用保留非指定字符的操作。 【解题思路】 本题使用了一种i永远是奇数的循环方法,即for(i=1;i 第五十四套 给定程序的功能是:求出能整除x且不是偶数的各整数,并放在数组pp中,这些除数的个数由n返回。 例如,若x的值为30,则有4个数符合要求,它们是1、3、5、15。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在横线上填入所编写的若干表达式或语句。 试题程序: #include void fun(int x, int pp[], int *n) { int I,j=0; for(I=1;I<=x;I+=2) if((x%I)==0) pp[j++]=【1】; *n=【2】; } main() { int x, aa[1000], n,i; printf("\nPlease enter an integer number:\n"); scanf("%d",&x); fun(x,【3】); for(i=0;i printf("%d ",aa[i]); printf("\n\n"); } 【参考答案】 (1) i (2) j (3) aa,&n 【考点分析】本题考查:指针型变量;数组元素赋值;函数调用,函数的参数不仅可以是整型、实型、字符型等数据,还可以是指针类型,它的作用是将一个变量的地址传送到另一个函数中。 【解题思路】 填空1:假如函数fun中判断语句if条件成立,那么将能整除x的数i放入数组pp中。 填空2:由于在程序pp[j++]中已经出现了使j加1的功能,所以直接使*n=j。 填空3:很明显,在函数中要传递的是一个数组和一个指针,所以填入aa和地址&n。 下列给定程序中函数fun的功能是:将长整型数中每一位上为偶数的数依次取出,构成一个新数放在t中。高位仍在高位,低位仍在低位。例如,当s中的数为87653142时,t中的数为8642。 请改正程序中的错误,使它能得出正确的结果。 注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。 试题程序: #include #include #include void fun(long s,long *t) /*************found**************/ { int d; long s1=0; *t=0; while(s>0) { d=s%10; if(d%2==0) {*t=d*s1+*t; s1*=10; } /*************found**************/ s\=10; } } void main() { long s,t; system("CLS"); printf("\nPlease enter s: "); scanf("%ld",&s); fun(s,&t); printf("The result is :%ld\n",t); } 【参考答案】 (1)错误:long s1=0; 正确:long s1=1; (2)错误:s\=10; 正确:s/=10; 【考点分析】 本题考查:变量初始化;除法运算符"/"。 【解题思路】 (1)分析程序,s1决定新整数中数的位置,从个位开始,那么s1应当为1。十位时,s1*=10,依此类推。 (2)这里明显是一个运算符的错误。 请编写函数fun,该函数的功能是:移动字符串中的内容,移动的规则是把第1到第m个字符,平移到字符串的最后,把第m+1到最后的字符移到字符串的前部。 例如,字符串中原有的内容为ABCDEFGHIJK,m的值为3,移动后,字符串中的内容应该是DEFGHIJKABC。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的花括号中填入所编写的若干语句。 试题程序: #include #include #define N 80 void fun (char *w,int m) { } void main() { FILE *wf; char a[N]= "ABCDEFGHIJK",b[N]= "ABCDEFGHIJK"; int m; printf("The origina string :\n"); puts(a); printf("\n\nEnter m: "); scanf("%d",&m); fun(a,m); printf("\nThe string after moving :\n"); puts(a); printf("\n\n"); /******************************/ wf=fopen("out.dat","w"); fun(b,3); fprintf(wf,"%s",b); fclose(wf); /*****************************/ } 【参考答案】 void fun (char *w,int m) { int i,j; char t; for(i=1;i<=m;i++) /*进行m次的循环左移*/ {t=w[0]; for(j=1;w[j]!='\0';j++) /*从第2个字符开始以后的每个字符都依次前移一个字符*/ w[j-1]=w[j]; w[j-1]=t; /*将第1个字符放到最后一个字符中*/ } } 【考点分析】 本题考查:循环左移算法。 【解题思路】 我们在学习C语言的时候,应该广泛地应用到循环的方法,本题应采用"循环左移"的算法。内嵌循环的作用是完成从第2个字符以后的每个字符都依次前移一个字符,w[j-1]=t的作用是将第1个字符放到最后一个字符中。 第五十五套 请补充函数fun,该函数的功能是:把从主函数中输入的字符串str2接在字符串str1的后面。 例如,str1="How do",str2=" you do?",结果输出:How do you do? 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的横线上填入所编写的若干表达式或语句。 试题程序: #include #include #include #define N 40 void fun(char *str1,char *str2) { int I=0; char *p1=str1; char *p2=str2; while(【1】) I++; for( ;【2】;I++) *(p1+I)=【3】; *(p1+I)='\0'; } void main() { char str1[N],str2[N]; system("CLS"); printf("*****Input the string str1 & tr2*****\n"); printf(" \nstr1:"); gets(str1); printf(" \nstr2:"); gets(str2); printf("**The string str1 & str2**\n"); puts(str1); puts(str2); fun(str1,str2); printf("*****The new string *****\n"); puts(str1); } 【参考答案】 (1) *(p1+i) (2) *p2 (3) *p2++ 【考点分析】本题考查:while循环语句;for循环语句;指针型变量,实现指针后移。 【解题思路】 填空1:变量i用来记录字符串str1的长度,当指针指到字符串str1结束标志符'\0'时,while循环结束,变量i停止累加。 填空2:指针p2指向字符串str2,通过for循环将字符串str2接在str1后面,循环结束的条件是指针p2所指的字符是字符串结束标志符'\0'。 填空3:指针p2最初指向字符串str2的首字符,通过自加1,使指针p2依次向后移动,指向str2的各个字符,实现将字符串str2接在str1后面的功能。 下列给定程序中,函数fun的功能是:交换主函数中两个变量的值。例如,若变量a中的值为8,b中的值为3,则程序运行后a中的值为3,b中的值为8。 请改正程序中的错误,使它能得出正确的结果。 注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。 试题程序: #include /*************found**************/ void fun(int x,int y) { int t; /*************found**************/ t=x;x=y;y=t; } void main() { int a,b; a=8; b=3; fun(&a, &b); printf("%d %d\n ", a,b); } 【参考答案】 (1)错误:void fun(int x, int y) 正确:void fun(int *x, int *y) (2)错误:t=x;x=y;y=t; 正确:t=*x;*x=*y;*y=t; 【考点分析】 本题考查:函数定义;变量值交换操作。 【解题思路】 (1)主函数中fun的调用方式说明函数fun的参数应为指针类型。 (2)本题考查指针变量做函数参数。采用一般变量做参数,不能改变实参的值,采用指针变量作 为参数,则能够改变实参的值。 主函数中fun( )的调用方式,说明fun( )函数的参数应当为指针类型。另外,值得一提的是" 交换法则",本题的错误比较明显,如果程序段中有隐蔽的交换错误,一般不容易发现,希望学习者引起注意。 请编写函数fun,该函数的功能是:将M行N列的二维数组中的数据,按列的顺序依次放到一维数组中。一维数组中数据的个数存放在形参n所指的存储单元中。 例如,若二维数组中的数据为: 33 33 33 33 44 44 44 44 55 55 55 55 则一维数组中的内容应是: 33 44 55 33 44 55 33 44 55 33 44 55 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的花括号中填入所编写的若干语句。 试题程序: #include void fun (int (*s)[10], int *b, int *n,int mm, int nn) { } void main() { int w[10][10]={{33,33,33,33},{44,44,44,44},{55,55,55,55}}, i, j; int a[100]={0},n=0 ; FILE *out; printf("The matrix:\n"); for (i=0; i<3; i++) {for (j=0;j<4;j++) printf("%3d",w[i][j]); printf("\n"); } fun(w,a,&n,3,4); /******************************/ out=fopen("out.dat","w"); printf("The A array:\n"); for(i=0; i { printf("%3d",a[i]); fprintf(out,"%d ",a[i]); } printf("\n\n"); fclose(out); /******************************/ } 【参考答案】 void fun(int (*s)[10],int *b,int *n,int mm,int nn) { int i,j; for(j=0;j /*将二位数组中的数据按列的顺序依次放入一维数组中*/ for(i=0;i { b[*n]=*(*(s+i)+j); *n=*n+1; /*通过指针返回元素个数*/ } } 【考点分析】本题考查:将二维数组元素按要求存入一维数组,需使用for循环语句来控制二维数组元素的下标,同时需要指针型变量配合操作。 【解题思路】 我们可以用两个循环来处理问题,由于是按列的顺序取出,所以第1个循环用于控制列下标,第2个循环用于控制行下标。 第五十六套 str为一个字符序列。请补充函数fun,该函数的功能是:查找str中值为x的元素,返回该字符序列中值为x的元素个数,并把这些值为x的元素下标依次保存在数组bb中。例如,在"abcdefahij"中查找'a',结果为:2个"a",下标依次为0、6。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的横线上填入所编写的若干表达式或语句。 试题程序: #include #include #include #define N 20 int bb[N]; int fun(char *str,char ch) { int I=0, n=0; char t=ch; char *p=str; while(*p) { if (【1】) 【2】; p++; I++; } return 【3】; } void main() { char str[N]; char ch; int i,n; system("CLS"); printf("*******Input the original string ********\n"); gets(str); printf("*******The Original ********\n"); puts(str); printf("******* Input character *******\n"); scanf("%c",&ch); n=fun(str,ch); printf("\nThe numbr of character is:%d\n",n); printf("********The suffix of character *******\n"); for(i=0;i printf("%d ",bb[i]); } 【参考答案】 (1) *p==t (2) bb[n++]=i (3) n 【考点分析】 本题考查:if条件表达式;指针型变量;数组元素赋值;return语句完成函数值的返回。 【解题思路】 填空1:通过指针p的移动来依次访问字符串的各个字符,如果指针p所指的字符等于待查找的字符,即表示找到了满足条件的字符。 填空2:将找到的字符在字符数组中的下标值保存在数组bb中。 填空3:变量n记录在字符串中找到待查找字符的个数。由main函数的调用可知,函数fun()的返回值为n。 下列给定程序中,函数fun的功能是:从N个字符串中找出最长的那个串,并将其地址作为函数值返回。各字符串在主函数中输入,并放入一个字符串数组中。 请改正程序中的错误,使它能得出正确的结果。 注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。 试题程序: #include #include #define N 5 #define M 81 /*************found**************/ fun(char (*sq)[N]) {int i; char *sp; sp=sq[0]; for(i=0;i if(strlen(sp) sp=sq[i]; /*************found**************/ return sq; } void main() {char str[N][M], *longest; int i; printf("Enter %d lines:\n ",N); for(i=0;i printf("\nThe %d string :\n ",N); for(i=0;i longest=fun(str); printf("\nThe longest string :\n "); puts(longest); } 【参考答案】 (1)错误:fun(char (*sq)[N]) 正确:char *fun(char (*sq)[M]) (2)错误:return sq; 正确:return sp; 【考点分析】本题考查:函数定义;return语句; 【解题思路】函数fun的形参为字符串指针数组,每个元素指向一个长度为M的字符串。从主函数中的语句可以看出,字符串指针数组的每个元素指向一个字符串,要求函数fun找出其中最长的字符串。可先假设指针数组的第1个元素所指的字符串最长,之后对字符串指针数组进行遍历,若遇字符串长度大于待定最长字符串,则令该字符串为待定最长字符串,如此循环直至指针数组末尾,即可得到最长字符串的地址。 假定输入的字符串中只包含字母和*号。请编写函数fun,它的功能是:除了字符串前导和尾部的*号之外,将串中其他*号全部删除。形参h已指向字符串中第一个字母,形参p已指向字符串中最后一个字母。在编写函数时,不得使用C语言提供的字符串函数。 例如,若字符串中的内容为****A*BC*DEF*G******,删除后,字符串中的内容应当是****ABCDEFG******。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在函数fun的花括号中填入所编写的若干语句。 试题程序: #include #include #include void fun(char *a,char *h,char *p) { } main () { char s[81],*t,*f; FILE *out; printf("Entre a string:\n"); gets(s); t=f=s; while(*t) t++; t--; while(*t=='*') t--; while(*f=='*') f++; fun(s,f,t); printf("The sting after deleted:\n"); puts(s); /**************************************/ out=fopen("out.dat","w"); strcpy(s,"****A*BC*DEF*G********"); fun(s,s+4,s+13); fprintf(out,"%s",s); fclose(out); /**************************************/ } 【参考答案】 void fun(char *a,char *h,char *p) { int i=0; char *q=a; while (q { a[i]=*q;q++;i++; } while (q {if(*q!='*') { a[i]=*q;i++; } q++; } while (*q) { a[i]=*q;i++;q++; } a[i]='\0'; } 【考点分析】 本题考查:while循环条件;指针型变量。 【解题思路】 这类题最重要的就是要选择好判断条件,首先是判断前导*的结束,然后判断是否指向最后一个字母,最后补充尾部*,只要思路对了就可正确解答。 第五十七套 请补充函数fun,该函数的功能是:先将在字符串s中的字符按逆序存放到字符串t中,然后把s中的字符按正序连接到t串的后面。 例如,s中的字符串为ABCDE时,则t中的字符串应为EDCBAABCDE。 注意:部分源程序给出如下。 请勿改动main 函数和其他函数中的任何内容,仅在函数fun 的横线上填入所编写的若干表达式或语句。 试题程序: #include void fun (char *s, char *t ) { int i,s1; s1=strlen(s); for (i=0;i void main() {char s[100], t[100]; system("CLS"); printf("\nPlease enter string s: "); scanf("%s",s); fun(s,t); printf ("The result is: %s\n",t); } 【参考答案】 (1) s1-i-1或s1-1-i (2) 2*s1或s1*2 【考点分析】 本题考查:数组元素赋值实现字符串逆序以及字符串连接操作。 【解题思路】 填空1:根据题意可知,第一个for 循环的目的是逆序字符串,则填入s1-i-1。 填空2:第二个for 循环,将字符串s 再次以正序方式存入t 中,最后给t 加上字符串结束标志'\0',这个位置正好是s 长度的2倍，故应填入2*sl 。 下列给定程序的功能是:读入一个整数(210000)k k ≤≤,输出它的所有质因子(即所有为素数的因子)。例如,若输入整数2310,则应输出:2、3、5、7、11。 请改正程序中的错误,使程序能得出正确的结果。 注意:不要改动main 函数,不得增行或删行,也不得更改程序的结构。 试题程序: #include /*************found**************/ IsPrime(int n); { int i,m; m=1; 2009年4月上机100套题51-60 第五十一套 给定程序的功能是:将n个人员的考试成绩进行分段统计,考试成绩放在数组a中,各分段的人数存到数组b中:成绩为60到69的人数存到b[0]中,成绩为70到79的人数存到b[l],成绩为80到89的人数存到b[2],成绩为90到99的人数存到b[3],成绩为100的人数存到b[4],成绩为60分以下的人数存到b[5]中。 例如,当数组a中的数据是:93、85、77、68、59、43、94、75、98。调用该函数后,数组b 中存放的数据应是:l、2、l、3、0、2。 注意:部分源程序给出如下。 请勿改动main函数和其他函数中的任何内容,仅在横线上填入所编写的若干表达式或语句。 试题程序: #include 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。 2009年4月全国自考概率论与数理统计（二）真题及参考答案 一、单项选择题（本大题共10小题，每小题2分，共20分）在每小题列出的四个备选项 中只有一个是符合题目要求的，请将其代码填写在题后的括号内。错选、多选或未选均 无分。 1.设A，B为两个互不相容事件，则下列各式中错误的是() A.P（AB）=0 B.P（A∪B）=P（A）+P（B） C.P（AB）=P（A）P（B） D.P（B-A）=P（B） 答案：C 2. A. A B. B C. C D. D 答案：D 3. A. A B. B C. C D. D 答案：A 4. A. A B. B C. C D. D 答案：C 5. A. A B. B C. C D. D 答案：C 6. A. A B. B C. C D. D 答案：B 7. A. A B. B C. C D. D 答案：A 8. A. A B. B C. C D. D 答案：D 9. A. A B. B C. C D. D 答案：B 10. A. A B. B C. C D. D 答案：A 二、填空题（本大题共15小题，每小题2分，共30分）请在每小题的空格上填上正确答 案。错填、不填均无分。 1.___ 答案：0.3 2.盒中有4个棋子，其中白子2个，黑子2个，今有1人随机地从盒中取出2子，则这2个子颜 色 相同的概率为___. 答案： 3.若随机变量X在区间［-1,+∞)内取值的概率等于随机变量Y=X-3在区间［a,+∞)内取值的概 率，则a=___. 答案：-4 4.___ 答案：0.2 5.___ 大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、https://www.doczj.com/doc/062830947.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括（C）。 A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上，应将进行(D)设置。 A、将控件的TabIndex属性设置为0 ---------数量关系部分题目溯源： 1、33， 32， 34， 31， 35， 30， 36， 29，？ A. 33 B. 37 C. 39 D. 41 选B 解答：交叉数列（即隔项或称奇偶数列）。分项后为等差数列。 源自：国考2002年A类第5题 34、36、35、35、（）、34、37、（） 都是交叉等差数列，并且公差为1和-1。 2、3， 9， 6， 9， 27，？， 27 A. 15 B. 18 C. 20 D. 30 选B 解答：二级作商周期数列。两两作商得到：3、2/3、3/2、3、2/3、3/2。 源自：国考2003年A类第1题 1、4、8、13、16、20、（） 原题是二级作差周期数列，新题是二级作商周期数列。 3、2， 12， 6， 30， 25， 100，？ A. 96 B. 86 C. 75 D. 50 选A 解答：变形奇偶数列。偶数项分别为前项乘以6、5、4得到，奇数项分别为前项减去6、5、4得到。 源自：北京应届2007年第4题 2，7，14，21，294，( ) 原题为：奇数项为前两项之乘积，偶数项为前两项之和。 4、4， 23， 68， 101，？ A. 128 B. 119 C. 74.75 D. 70.25 选C 解答：变倍数递推数列。后一项分别为前一项剩以6、3、1.5、0.75再减去1得到。 4×6-1=23 23×3-1=68 68×1.5-1=101 101×0.75-1=74.75 源自：北京应届2007年第1题 2，13，40，61，( ) 只是把原题规律当中的加1变成了减1，连扩大的比例都没有改变。 5、323， 107， 35， 11， 3，？ A. -5 B. 1/3 C. 1 D. 2 选B 解答：倍数递推数列。前一项减去2后乘以1/3得到后一项。 (323-2)×1/3=107 (107-2)×1/3=35 (35-2)×1/3=11 (11-2)×1/3=3 (3-2)×1/3=1/3 此题亦可倒过来看，即是后一项乘以3再加2得到前一项。 源自：浙江2004年第3题 0，1，4，13，40，( ) 把大小变化方向反过来，就只是把原题规律当中的加1变成了新题当中的加2。 11、甲、乙、丙、丁四人今年分别是16、12、11、9岁。问多少年前，甲、乙的年龄和是丙、丁年龄和的2倍？ A、4 B、6 C、8 D、12 源自：国家2004年B类第50题 祖父年龄70岁，长孙20岁，次孙13岁，幼孙7岁，问多少年后，三个孙子的年龄之和与祖父的年龄相等？ 15、某车间进行季度考核，整个车间平均分是85分，其中2/3的人得80分以上（含80分），他们的平均分是90分，则低于80分的人的平均分是多少？ A、68 B、70 C、75 D、78 VB上机综合测试题（一） 一、如下所示，在窗体上，放置一个文本框text1（文本框中的文字为“改变字形”，居中显示）。三个复选框check1,check2和check3，如图设置属性。要求：当用户单击“加粗”、“斜体”、“下划线”这三个复选框时（即当复选框被选中时）能将文本框的字形变为“粗体、斜体、加下划线”（25分） 二、在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值")。程序运行后，单击命令按钮完成以下工作：①随机产生20个0到1000的整数，将其放入一个一维数组中②求出所有元素的平均值，并显示在窗体上(如下图所示)（35分） 三、请设计如下图所示窗体界面。运行程序时，先向左侧文本框中输入一个不超过10的正整数，然后选择"N的阶乘"或"(N+2)的阶乘"单选钮，即可进行计算，计算结果在右侧文本框中显示。请编写程序完成上述功能。（40分） 答案： 一、 界面设计------10分 Private Sub Check1_Click() = ------5分 End Sub Private Sub Check2_Click() = 分 End Sub Private Sub Check3_Click() = ------5分 End Sub 二、 界面设计------10分 Private Sub Cmd1_Click()------2分Dim a%(19), i%, sum!, aver! ------4分Randomize ------3分 For i = 0 To 19------3分 a(i) = Int(Rnd * 1001) ------3分 sum = sum + a(i) ------3分 Next i ------2分 aver = sum / 20 ------3分 Print aver ------2分 End Sub 三、 界面设计------10分 Dim? n%------2分 Private Sub Form_Load() End Sub 2009年4月考试真题(A卷) Part I Reading Comprehension （30%） Directions：There are three passages in this part. Each passage is followed by some questions or unfinished statements. For each of them there are four choices marked A，B，C and D. You should decide on the best choice and mark the corresponding letter on the Answer Sheet with a single line through the center. Passage 1 Questions 1 to 5 are based on the following passage： I hear many parents complain that their teenage children are rebelling. I wish it were so. At your age you ought to be growing away from your parents. You should be learning to stand on your own feet. But take a good look at the present rebellion. It seems that teenagers are all taking the same way of showing that they disagree with their parents. Instead of striking out boldly on their own，most of them are holding one another's hands for reassurance （放心）。 They claim they want to dress as they please. But they all wear the same clothes. They set off in new directions in music. But they all end up listening to the same record. Their reason for thinking or acting in such a way is that the crowd is doing it. They have come out of their cocoon （茧）into a larger cocoon.. （76）It has become harder and harder for a teenager to stand up against the popularity wave and to go his or her own way. Industry has firmly carved out a market for teenagers. These days every teenager can learn from the advertisements what a teenager should have and be. This is a great barrier for the teenager who wants to find his or her own path. But the barrier is worth climbing over. The path is worth following. You may want to listen to classical music instead of going to a party. You may want to collect rocks when everyone else is collecting records. You may have some thoughts that you don't care to share at once with your classmates. Well，go to it. Find yourself. Be yourself. Popularity will come—with the people who respect you for who you are. That's the only kind of popularity that really counts. 1. The author's purpose in writing this passage is to tell______. A. readers how to be popular with people around B. teenagers how to learn to make a decision for themselves C. parents how to control and guide their children D. people how to understand and respect each other 2. According to the author，many teenagers think they are brave enough to act on their own，but in fact most of them______. Word 基本操作练习题 1.字处理题 请在"考试项目"菜单上选择"字处理软件使用"菜单项，完成以下内容： ******本题型共有1小题****** 在考生文件夹中，存有文档WT1.DOC，其内容如下： 【文档开始】 本专业培养目标是计算机专业的技术应用型人才，他们应该掌握计算机软件、硬件及系统的基本理论、基本方法和基本技能，能够从事计算机及相关领域应用技术工作、软、硬件维护、和一般应用系统的开发及设计，他们应该具有专业化计算机人的素质，是全面发展的社会主义建设人才。 【文档结束】 按要求完成下列操作： （1）请将Word文档WT1.DOC设成楷体、小三号字并加粗、斜体。 （2）设置A4（210mm×297mm）纸张大小，左右边距设置为2.5厘米，页眉2.2厘米，其余页面设置的参数不必修改。保存文件为WD1.DOC。 2.请在"考试项目"菜单上选择"字处理软件使用"菜单项，完成以下内容： ******本题型共有4小题****** 1. 在考生文件夹中，存有文档WT 2.DOC，其内容如下： 【文档开始】 面向对象方法基于构造问题领域的对象模型，以对象为中心构造软件系统。它的基本方法是用对象模拟问题领域中的实体，以对象间的联系刻画实体间的联系。因为面向对象的软件系统的结构是根据问题领域的模型建立起来的，而不是基于对系统应完成的功能的分解，所以，当对系统的功能需求变化时并不会引起软件结构的整体变化，往往仅需要一些局部性的修改。例如，从已有类派生出一些新的子类以实现功能扩充或修改，增加删除某些对象等等。总之，由于现实世界中的实体是相对稳定的，因此，以对象为中心构造的软件系统也是比较稳定的。 【文档结束】 按要求完成下列操作：新建文档WD2.DOC，插入文件WT2.DOC的内容，设置为小四号仿宋_GB2312字体，分散对齐，所有"对象"设置为黑体、加粗，存储为文件WD2.DOC。 2. 新建文档WD2A.DOC，插入文件WD2.DOC的内容，将正文部分复制2次，将前两段合并为一段，并将此段分为3栏，栏宽相等，栏宽为 3.45厘米，栏间加分隔线。存储为文件 WD2A.DOC。 3. 制作3行4列表格，列宽2厘米，行高1厘米。填入数据，水平方向上文字为居中对齐，数 4. 并将第4行设置为黄色底纹，统计1、2、3列的合计添加到第4行，存储为文件WD2C.DOC。 请在"考试项目"菜单上选择"字处理软件使用"菜单项，完成以下内容： ******本题型共有2小题****** 3. 在指定文件夹下打开文档WT3.DOC，其内容如下： 【文档开始】 第二部分VB上机考试模拟试题 一、程序调试题(改错或填空) （二）程序调试题 [题1] Modify.bas模块中的getanswer过程是用于计算一元二次方程的根，并将结果输出来。 Option Explicit Public Sub getanswer() '该过程是用于计算一元二次方程的根，并将结果输出来。 Dim dalt!, a#, b#, c# a = InputBox("输入系数a") b = InputBox("输入系数b") c = InputBox("输入系数c") dalt = b * b - 4 * a * c If ----1---- dalt >0 then dalt = Sqr(dalt) MsgBox Format((-b + dalt) / 2 / a), "0.00" + Chr(13) + Chr(10) + Format((-b - dalt) / 2 / a, "0.00") Elseif ---2---- dalt =0 then MsgBox Format(-b / 2 / a, "0.00") + Chr(13) + Chr(10) + Format(-b / 2 / a, "0.00") Else dalt= ---3---- Sqr(-dalt) MsgBox Format((-b + dalt) / 2 / a, "0.00") + "+i" + Chr(13) + Chr(10) + Format((-b - dalt) / 2 / a, "0.00") + "-i" End If End Sub [题2] 打印输出一菱形图案。 Public Sub prt() '打印由#组成的菱形图案 ' # ' ### ' ##### ' ####### ' ######### ' ####### ' ##### ' ### Dim start As String '每行起始空格数 Dim count As Integer '每行#个数 For i = 1 To 9 If i <= 5 Then '------1------ start=space(21-i) count = 2 * i - 1 Else start = Space(11 + i) '-------2------ count=19-2*i End If '------3------ form1.print start; For j = 1 To count Form1.Print "#"; Next j '------4------ form1.print Next i [题3] 过程pyramid用以打印一个数字金字塔，请在横线上填入必要的内容（将横线删除掉后填入正确的内容），使其完整。 Option Explicit Public Sub pyramid() '打印数字金字塔 ' 1 ' 222 ' 33333 ' 4444444 ' 555555555 ' 6666666 ' 77777 ' 888 ' 9 Dim i As Integer Dim j As Integer Dim start As String '每行起始空格数 Dim num As Integer '每行数字个数 For i = 1 To 9 If i <= 5 Then start = Space(20 - i) num = 2 * i - 1 Else start= '------1------ Space(10 + i) num= '------2------ 2 * (10-i) - 1 End If Form1.Print start; For j = 1 To num '------3------ form1.print trim(str(i)); Next j '------4------ form1.print Next i End Sub [题4] 改错。 Option Explicit Public Sub prt() '打印由数字组成的如下所示金字塔图案 ' 9 ' 888 ' 77777 ' 6666666 ' 555555555 ' 44444444444 ' 3333333333333 ' 222222222222222 ' 11111111111111111 Dim i As Integer, j As Integer '****** 错误1 ****** For i = 9 To 1 step -1 Form1.Print Space(i); '****** 错误2 ****** For j = 1 To 2 *(10- i) - 1 '****** 错误3 ****** Form1.Print trim(str(i)); Next j 2009年4月全国自考英语（二）真题及参考答案一、Vocabulary and Structure（10 points,1 point for each item）从下列各句四 个选项中选出一个最佳答案，并在答题卡上将相应的字母涂黑。 1.We ______ go out to restaurants, but mostly we eat at home. A.occasionally B.relatively C.continually D.absolutely 答案：A 2.This is the first time that a woman has been _____ to the post. A.granted B.praised C.pointed D.appointed 答案：D 3.If payment is not received, legal action will be our only_____ . A.aggression B.advantage C.alternative D.ambition 答案：C 4.Dont trust everything______ you have read in the newspapers. A.which B.that C.as D.what 答案：B 5.The conclusion from the study is not definite; it is just_____ . A.tentative B.valid C.technical D.thorough 答案：A 6.She _____ everything else and concentrated on the task before her. 第一部分 1 在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值")。程序运行后，单击命令按钮完成以下工作： ①随机产生20个0到1000的整数，将其放入一个一维数组中 ②求出所有元素的平均值，并显示在窗体上(如下图所示) Private Sub Cmd1_Click() Dim a%(19), i%, sum!, aver! Randomize For i = 0 To 19 a(i) = Int(Rnd * 1001) sum = sum + a(i) Next i aver = sum / 20 Print aver End Sub 2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮，如下图所示。在程序运行时，单击"转换"按钮，可以把Text1中的小写字母转换为大写，把大写字母转换为小写，其他字符不变。 Private Sub C1_Click() Dim ch As String, ch1 As String, i% ch = Text1 For i = 1 To Len(ch) If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Then ch1 = ch1 + LCase(Mid(ch, i, 1)) Else ch1 = ch1 + UCase(Mid(ch, i, 1)) End If Next i Text1 = Text1 + vbCrLf Text1 = Text1 + ch1 End Sub 3 在窗体上添加一个命令按钮(名称为MyCmd1，标题为"输出最大值")。程序运行后，单击命令按钮完成以下工作： ①随机产生30个0～1000的整数，将其放入一个一维数组中 ②求出其中的最大值，并显示在窗体上。 Private Sub MyCmd1_Click() Dim a%(29), i%, max% Randomize For i = 0 To 29 a(i) = Int(Rnd * 1001) Next i max = a(0) For i = 1 To 29 If a(i) > max Then max = a(i) Next i Print max End Sub 4 请设计如下图所示窗体界面。程序运行时，在选中一个或两个复选框和一个单选按钮时，单击命令按钮，则对文本框中的文本内容做相应的设置。请编写适当的事件过程，完成上述功能。 实验一总帐 一、系统管理 1、注册系统管理。以系统管理员（admin）的身份注册系统管理。 2、设置操作员。 编号姓名口令所属部门 001王亮1财务部 002唐非2财务部3、建立帐套。 账套号： 888 账套名称：广州市 账套路径：默认 启用会计期：2013年1月 单位名称：广州市白云工商高级技工学校 单位简称：白云学院 记账币种：人民币 企业类型：工业 行业性质：新会计制度科目 账套主管： demo 分类信息：对客户、供应商、存货分类，有外币核算 编码方案：科目编码级次为4-2-2-2-2，其他编码级次采用默认值 数据精度：保留的小数位均为2 系统启用：启用总账子系统；启用日期：2013-01-01 4、设置操作员权限 王亮：拥用“公用目录设置”、“总账”、“财务报表”、“现金管理”的全部权限 唐非：拥有“公共目录设置”及“总帐”中的所有权限 由001进行初始化设置 二、系统初始化 1、部门档案 部门编码部门名称 1管理部 2财务部 3采购部 4销售部 2、职员档案 职员编号职员名称所属部门101李同管理部 201赵超财务部 202王刚财务部 301张海采购部 401刘英销售部 3、客户档案 客户编码客户名称客户简称地址邮政编码 001北京育新 小学 育新小学 002天津宏达 公司 宏达公司 4、供应商档案 供应商编 码供应商名称 供应商简 称 地址 邮政编 码 001北京迅达有限责 任公司 北京迅达 002深圳华光软件公 司 深圳华光 5、外币及汇率币符：USD 币名：美元， 记账汇率：6.5 6、结算方式 结算方式编码结算方式名称票据管理1现金否 2支票否 3其他否 7、凭证类别 凭证类别限制类型限制科目 收款凭证借方必有1001，1002 付款凭证贷方必有1001，1002 转账凭证凭证必无1001，1002 8、会计科目 科目名称辅助核 算 科目 类型 方向 币别 计量 期初余额 现金（1001）日记资产借5000银行存款（1002）银行日 记 资产借125000 工行存款（100201）银行日 记 资产借80000 中行存款（100202）银行日 记 资产借美元45000 应收账款（1131）客户往 来 资产借*30000其他应收款（1133）个人往 来 资产借*2000库存商品（1243）资产借155000 2009年4月全国自考写作（一）试题参考答案 一、单项选择题(本大题共20小题，每小题1分，共20分)在每小题列出的四个备选项中 只有一个是符合题目要求的，请将其代码填写在题后的括号内。错选、多选或未选均无 分。 1.说明文主要是（） A.以形象感染读者，以情感人 B.通过解说的方式介绍知识，扩大读者的视野 C.以理服人，使人信服 D.既介绍知识，又以情感人 答案：B 2.文章中具有承上启下功能的过渡段，通常称之为（） A.引文段 B.兼义段 C.逻辑段 D.结束段 答案：B 3.对下级机关布置某项工作，要求办理或执行时所使用的通知是（） A.知照性通知 B.发布性通知 C.指示性通知 D.批示性通知 答案：C 4.“注释性材料”、“对比性材料”和“说明性材料”主要用于消息的（） A.导语部分 B.主体部分 C.背景部分 D.结尾部分 答案：C 5.新闻标在“正题”之上的题目叫（） A.副题 B.主题 C.引题 D.辅题 答案：C 6.古人说“文如行云流水”，这是指结构的（） A.连贯性 B.完整性 C.严密性 D.灵活性 答案：A 7.以下理解不正确的一项是（） A.文章语言是人类交流思想最有效的物质媒介 B.文章语言是写作的物质媒介 C.文章语言是表达思想感情的精神媒介 D.文章语言和思想、思维是不可分割的 答案：C 8.处理材料详略的一条根本原则是（） A.服从表现主题的需要 B.服从情节展开的需要 C.服从表现人物性格的需要 D.注重材料的新颖独特 答案：A 9.比较说明是（） A.用文献资料与作品片断进行比较来说明事理 B.把若干个同类相近事物放在一起，以突出某个事物的特点、性质、构造等 C.对文章中有歧义、疑问或不具体、不详细、不清晰之处进行适当的解说和注释 D.对复杂的实体事物，采用化整为零的方法进行说明 答案：B 10.说明书为了体现条理性特点，写作时应该做到（） A.内容表达上的确凿和准确 B.抓住使用上的难点和疑点 C.注意内容表达上的有序性 D.排除作者的主观感情色彩 答案：C 11.文章写作选词贴切必须做到（） A.词语运用形象 B.采用现成词语 C.根据语境选词 D.尽量少用动词 答案：C VB程序设计期末考试题 一、选择题 1 下列常量中，是Integer类型常量的是（ C ）。 A、123& B、-38844 C、123% D、32768 2 下面选项中()是字符连接运算符. A A、& B、And C、% D、Mod 3 下面关于VB的集成开发环境（IDE）的叙述中，不正确的是（ B ）。 A、IDE是设计、调试、运行VB程序的工具。 B、用户不能随意关闭IDE中的窗口。 C、"窗体设计" 窗口是用来设计应用程序界面（窗体）的。 D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中。 4 len(“vb程序设计”)=( C ) 。 A、 5 B、2 C、 6 D、10 5 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 D A、7 B、0 C、2 D、4 6 赋值语句A=123 + Mid$( “123456”,3,2) 执行后，A=（A）。 A、157 B、12334 C、123 D、"12334" 7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C). A、, B、; C、: D、、 8 将逻辑型数据转换成整型数据时，转换规则是（ D ）。 A、将True转换为 1 ，将False转换为 0 B、将True转换为 1 ，将False转换为 -1 C、将True转换为 0 ，将False转换为 -1 D、将True转换为 -1 ，将False转换为 0 9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D). A、SIN B、4^5 C、3*4 D、x+1 10 如果x=2，则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值（ B ）。 A、不能计算 B、 True C、5 D、False 11 随机产生[10，50] 之间整数的正确表达式是（ D ）。 A、Round( Rnd*50) B、 Int(Rnd*40+10) C、Round( Rnd*51) D、 10+Int(Rnd*41) 12 每建立一个窗体,工程管理器窗口中就会增加一个(C). A、类模块文件 B、工程文件 C、窗体文件 D、程序模块文件 13 INT(100*RND(1))产生的随机整数的闭区间是(B). A、[1,100] B、[0,99] C、[0,100] D、[1,99] 14 下列数据类型中,占用内存最小的是(D). A、Integer B、Single C、Boolean D、Byte 15 VisualBasic是一种()程序设计语言.B A、过程式 B、非过程式 C、机器 D、低级 16 函数Int(10*Rnd)是在(A)范围内的整数. A、[0,9] B、[0,1] C、[1,9] D、[1,10] 17 以下合法的一组Visual Basic用户标识符是 C A、Sum 和 8abc B、a#x 和 Pi C、ForLoop 和 Total D、Const 和 DoWhile 2009年4月全国自考《综合英语(二)》真题及答案 课程代码：00795 Ⅰ. 语法、词汇。从A、B、C、D四个选项中，选出一个正确答案，并填在答题纸相应的位置上。(本大题共15小题，每小题1分，共15分) 1. He _______ the idea that he couldn’t do the job and was determined to show them that he was qualified for it. A. refused B. declined C. rejected D. opposed 【答案】C 2. The Evening News identified at least two village officials said to be actively _____ the illegal trade. A. related to B. linked with C. integrated into D. involved in 【答案】D 3. One reason for the present interest in both polar regions is that the world may soon be _____ fresh water. A. deprived of B. cut of C. short of D. empty of 【答案】C 4. Travelers flying across time zones often find themselves exhausted because human bodies can’t make an immediate _____ to new time schedules. A. adjustment B. change C. difference D. modification 【答案】A 5. In today’s society, people are _______ for different reasons, such as their achievement, their wealth, or even their appearance. A. celebrated B. congratulated C. prized D. encouraged2009年4月上机100套题及答案51-60
VB期末考试试题及答案
2009年4月2011年4月自考概率论与数理统计(二)真题及参考答案
大学VB考试题库
行测100套模拟试题含答案5(共6)
VB上机综合测试题(十五套)
2009年4月成人英语三级考试真题(A卷)及答案
word上机操作练习题库
VB上机程序调试题_题目及参考答案
2009年4月全国自考英语(二)真题及参考答案
VB练习题(上机)含答案
用友上机操作题(平时上机练习题)
2009年4月全国写作一真题和答案
VB考试题及答案
2009年4月全国自考《综合英语(二)》真题及答案(圣才出品)
相关主题
文本预览