程序填空
- 格式:docx
- 大小:23.54 KB
- 文档页数:11
(完整版)python真题程序填空阅读填空程序试题一、程序填空1.有如下程序段:sum=0for i in range(1,20,3) :sum+=iprint(“sum=”,sum)(1)循环变量i的初值为:_________,终值为:_________,步长为:__________。
(2)该程序执行后,输出的结果为:____________________。
2.程序编写求1+22+32+……+1002的结果____________________________________________________________________________________________________________________________input(“运行完毕,请按回车键退出...”)3.完善程序。
以下是计算S=1+6+11+…+101的程序代码。
请你在处填写正确的语句。
s=0k=1while(k<=101)__s=0k=1while(k<101):k=k+5s=s+kprint(s+1)4.调试程序。
请阅读以下程序并写出运行结果。
#ex16.pyi=0sum=0while i<10:if i%3==0:sum+=iprint(i)i=i+1print('sum',sum)_________5.编写程序,找到并输出100以内的素数。
6.计算机解决问题的过程为“分析问题——设计算法(流程图)——编写程序——调试程序”,请输入以下代码,自己输入数据运行,结果截图提交7.求50以内所有5的倍数的和。
8.小明设计了一个可以输入日期得到当天是年度第几天的程序,请阅读程序,完成填空(闰年判断规则:能被4整除但不能被100整除或能被400整除,闰年的2月为29天)day=input("请输入年月日(格式举例:2000-01-05):")year=int(day[:4])month=_________sun=int(day[8:10])print(year,month,sun)f_run=[31,28,31,30,31,30,31,31,30,31,30,31]tall_day=0if ______:for i in range(month-1):tall_day +=f_run[i]__________else:for i in range(month-1):tall_day +=f_run[i]tall_day += sunprint(day+"是当年的第"+str(tall_day)+"天")(1)将程序横线处补充完整(2)如输入“2020-4-19”为当年的第_____天。
(完整版)java程序填空题一、程序填空题(每空3分,共30分)1.以下程序要求从键盘输入一个整数,判别该整数为几位数,并输出结果,请将下面的程序填写完整。
public class Blank1 {public static void main(String[] args) throws IOException { Scanner sc=new Scanner( (1) );int count=0,t;int x=sc.nextInt();sc.close();t=x;while(t!=0){count++;(2) ;}System.out.println(x+"是"+count+"位数。
");}}答案:(1)System.in(2)t=t/102.在下面的程序中使用方法重载分别实现了两个和三个整数的相加,请将下面的程序填写完整。
class AddOver{public (3){return a+b;}public int add( int a, int b, int c ){return a+b+c ;}}public class Blank2{public static void main(String[] args){AddOver a= (4) ;System.out.println(a.add(1,2));System.out.println(a.add(1,2,3));}}答案:(3)int add(int a,int b)(4)new AddOver()3. 构造一个类来描述一个点,该类的构成包括点的x和y两个坐标,以及一些对点进行的操作,包括:取得点的坐标值,利用另一个点对当前点的坐标进行赋值,请将下面的程序填写完整。
class Point{int x,y;public(5) (int x, int y){this.x=x; this.y=y;}public Point getPoint(){Point temp = new Point(0,0);temp.x=x; temp.y=y;return (6);}public void setPoint( (7) ){this.x=s.x; this.y=s.y;}}public class Blank3 {public static void main(String[] args){Point a = new Point(3,4);Point b = new Point(0,0);b=a.getPoint();Point c = new Point(0,0);c.setPoint(b);}}答案:(5)Point(6)temp(7)Point s4. 下面的程序完成从D:\Hello.txt中读取文本并显示在屏幕上,请将下面的程序填写完整。
程序填空【程序填空】1、功能:以下程序的功能如(图1)。
⽤公式求出π的值,保留六位有效数字。
运⾏结果为:3.141595#include#includemain(){int f;/***********SPACE***********/double n;double t,pi;t=1;pi=t;f=1;n=1.0;/***********SPACE***********/while(fabs(t)>=1e-6 ){n=n+2;/***********SPACE***********/f=-f;t=f/n;pi=pi+t;}/***********SPACE***********/pi=pi*4;printf("pi=%10.6f\n",pi);}2、功能:输出100到1000之间的各位数字之和能被15整除的所有数,输出时每10个⼀⾏。
#includemain(){int m,n,k,i=0;for(m=100;m<=1000;m++){/***********SPACE***********/k=0;n=m;do{/***********SPACE***********/k=k+n%10 ;n=n/10;}/***********SPACE***********/while(n!=0);if (k%15==0){printf("%5d",m);i++;/***********SPACE***********/if(i%10==0) printf("\n");}}}3、功能:输出100到1000之间的各位数字之和能被15整除的所有数,输出时每10个⼀⾏。
#includemain(){int m,n,k,i=0;for(m=100;m<=1000;m++){/***********SPACE***********/k=0;n=m;do{/***********SPACE***********/k=k+n%10 ;n=n/10;}/***********SPACE***********/while(n!=0);if (k%15==0){printf("%5d",m);i++;/***********SPACE***********/if(i%10==0) printf("\n");}}}4、功能:百鸡问题:100元买100只鸡,公鸡⼀只5元钱,母鸡⼀只3元钱,⼩鸡⼀元钱三只,求100元钱能买公鸡、母鸡、⼩鸡各多少只?#includemain(){int cocks,hens,chicks;cocks=0;while(cocks<=19){/***********SPACE***********/hens=0;/***********SPACE***********/while(hens<=33){chicks=100-cocks-hens;if(5*cocks+3*hens+chicks/3==100)printf("%d,%d,%d\n",cocks,hens,chicks);/***********SPACE***********/hens++;}/***********SPACE***********/cocks++;}}5、功能:输出1到100之间每位数的乘积⼤于每位数的和的数。
一、程序填空共15题第1题本程序的功能是将某个十进制数转换成一个8位的二进制数, 请完善本程序, 如110-> 01101110,1->00000001。
Private Sub command1_click()Dim n As Integer ,b As Integer, i As Integer, s As Stringn=110Do While n > 0b = n Mod 2n = n \ 2'**********SPACE**********【?】LoopFor i = 1 To 8 - Len(s)'**********SPACE**********s =【?】Next iPrint n & ″的二进制为″& sEnd Sub答案:=======(答案1)=======s= b & s=========或=========s= cstr(b) & s=========或=========s= str(b) & s=======(答案2)======="0" & s=========或=========string(1,"0") & s第2题(10.0分)'下面程序的功能是求序列:1/2,2/3,3/5,5/8,8/13,13/21,……前若干项的和,'项数由文本框输入。
试完善程序使其达到功能要求。
Option ExplicitPrivate Sub Command1_Click()Dim n As Integer, a1 As Integer, a2 As IntegerDim i As Integer, t As Single, s As Singlen = Val(Text1.Text)a1 = 1a2 = 2For i = 1 To n'**********SPACE**********【?】s = s + ta2 = a1 + a2'**********SPACE**********【?】Next iText2 = sEnd Sub答案:=======(答案1)=======t = a1 / a2=======(答案2)=======a1 = a2 - a1第3题'下面是一个求函数f(x)值的程序。
一、程序填空题(共50分)1、请补充函数proc(),它的功能是:计算并输出n(包括n以内能被3或7整除的所有自然数的倒数之和。
例如,在主函数中从键盘给n输入20后,输出为:s=1.030952。
注意:部分源程序给出如下。
请勿改动main()函数和其他函数中的任何内容,仅在函数proc()的横线上填入所编写的若干表达式或语句。
试题程序:2、从键盘输入一组无符号整数并保存在数组arr[N]中,以整数0结束输入,即第N+1个数是0,要求这些数的最大位数不超过4位,其元素的个数通过变量num传人函数proc()。
请补充函数proc(),其功能是:从数组arr中找出个位和十位的数字之和大于5的所有无符号整数,结果保存在数组yy中,其个数由函数proc返回。
例如,当arr[8]={13,1,205,252,2,333,4444,21)时实际输人时,数与数之间用Enter 键分开,bb[4]={252,333,4444)。
注意:部分源程序给出如下。
请勿改动函数main()和其他函数中的任何内容,仅在函数proc()的横线上填入所编写的若干表达式或语句。
试题程序:3、请补充函数proc(),该函数的功能是:把从主函数中输入的由数字字符组成的字符串转换成一个无符号长整数,并且逆序输出。
结果由函数返回。
例如,输入:1234567,结果输出:7654321。
注意:部分源程序给出如下。
请勿改动main()函数和其他函数中的任何内容,仅在函数proc()的横线上填入所编写的若干表达式或语句。
试题程序:4、请补充main()函数,该函数的功能是:打印出满足个位的数字、十位上的数字和百位上的数字都相等的所有3位数。
本题的结果为:111222 333 444 555 666 777 888 999。
注意:部分源程序给出如下。
请勿改动main()函数和其他函数中的任何内容,仅在main()函数的横线上填入所编写的若干表达式或语句。
C语言程序填空题1.阅读以下程序并填空。
以下程序的功能是:输出三位正整数中能被13整除的数#include <stdio.h>main(){ int n;for( n=100 ; n<=999 ;n++) if(n%13!=0) continue ; else printf("%d\n",n);} 2.阅读以下程序并填空。
以下程序的功能是:输出100以内能被3整除且个位数为6的所有整数 #include <stdio.h>main(){ int i,j;for(i=0; i<=9 ;i++){ j= i*10+6 ;if(j%3!=0) continue;else printf("%d\n",j);} }3.阅读以下程序并填空。
以下的程序功能是:求101至999之间所有能被13整除的整数之和和个数 #include <stdio.h>main(){ int i,cnt;float sum=0;i=101; cnt=0;while( i<=999 ){ if( i%13==0 ){ sum+=i; cnt++; } i++ ; )printf("sum=%f,cnt=%d\n”,sum,cnt);}4.阅读以下程序并填空。
该程序的功能是:用递归的方法求菲波那契数列2,2,4,6,10,16, 26,42,68,110,……的第10项 #include <stdio.h>long fib(int n){ if(n>= 3 )return fib(n-1)+fib(n-2);elsereturn 2 ; }main(){ printf("%ld\n”,fib(10)); }5.阅读以下程序并填空。
该程序的功能是:用递归法求:1 + 2 + 3 + + n#include <stdio.h> long Sum(int n) { if(n> 1 )return n+Sum(n-1); else return 1 ;)6.阅读以下程序并填空。
c语言程序填空含答案在学习C语言的过程中,掌握程序填空的技巧是非常关键的。
程序填空题目可以帮助我们加深对C语言语法和逻辑的理解,并锻炼我们的编程思维能力。
在本文中,将为大家提供一些C语言程序填空题及其答案,希望对大家的学习有所帮助。
1. 下面是一个求最大公约数的C语言程序,请填写缺失的代码。
```c#include <stdio.h>int gcd(int a, int b) {if (b == 0) {return a;} else {return gcd(b, a % b);}}int main() {int num1, num2;printf("请输入两个正整数:");scanf("%d%d", &num1, &num2);printf("最大公约数为:%d", gcd(num1, num2)); return 0;}```答案:```c#include <stdio.h>int gcd(int a, int b) {if (b == 0) {return a;} else {return gcd(b, a % b);}}int main() {int num1, num2;printf("请输入两个正整数:");scanf("%d%d", &num1, &num2);printf("最大公约数为:%d", gcd(num1, num2));return 0;}```2. 下面是一个计算平均数的C语言程序,请填写缺失的代码。
```c#include <stdio.h>double average(int arr[], int length) {int sum = 0;for (int i = 0; i < length; i++) {sum += arr[i];}return sum / length;}int main() {int numbers[] = {5, 10, 15, 20, 25};int length = sizeof(numbers) / sizeof(numbers[0]);printf("平均数为:%.2f", average(numbers, length));return 0;}答案:```c#include <stdio.h>double average(int arr[], int length) {int sum = 0;for (int i = 0; i < length; i++) {sum += arr[i];}return (double)sum / length;}int main() {int numbers[] = {5, 10, 15, 20, 25};int length = sizeof(numbers) / sizeof(numbers[0]);printf("平均数为:%.2f", average(numbers, length));return 0;}```3. 下面是一个字符串反转的C语言程序,请填写缺失的代码。
c语言程序填空题库及详解答案在C语言的学习过程中,程序填空题是一种常见的练习方式,它可以帮助学生加深对C语言语法和逻辑的理解。
下面是一个C语言程序填空题库的示例,包括题目和相应的详解答案。
题目一:计算圆的面积```c#include <stdio.h>#define PI 3.14159int main() {double radius, area;printf("请输入圆的半径:");scanf("%lf", &radius);area = PI * radius * radius;printf("圆的面积是:%.2f\n", area);return 0;}```题目二:判断闰年```c#include <stdio.h>int main() {int year;printf("请输入一个年份:");scanf("%d", &year);if ((year % 4 == 0 && year % 100 != 0) || year % 400 == 0) {printf("%d 是闰年。
\n", year);} else {printf("%d 不是闰年。
\n", year);}return 0;}```题目三:求最大公约数```c#include <stdio.h>int gcd(int a, int b) {while (b != 0) {int temp = b;b = a % b;a = temp;}return a;}int main() {int num1, num2;printf("请输入两个整数:");scanf("%d %d", &num1, &num2);printf("最大公约数是:%d\n", gcd(num1, num2)); return 0;}```题目四:字符串反转```c#include <stdio.h>#include <string.h>void reverse(char str[]) {int len = strlen(str);for (int i = 0; i < len / 2; i++) {char temp = str[i];str[i] = str[len - i - 1];str[len - i - 1] = temp;}}int main() {char str[100];printf("请输入一个字符串:");scanf("%s", str);reverse(str);printf("反转后的字符串是:%s\n", str);return 0;}```题目五:计算阶乘```c#include <stdio.h>int factorial(int n) {if (n <= 1) {return 1;} else {return n * factorial(n - 1);}}int main() {int num;printf("请输入一个正整数:");scanf("%d", &num);printf("%d 的阶乘是:%d\n", num, factorial(num));return 0;}```以上题目涵盖了C语言中的一些基础概念,如循环、条件判断、函数定义和数组操作。
1.把数组a(大小为M)中前M-1个元素中的最小值放入a的最后一个元素中。
#include <stdio.h>#define M 11int main(){ int a[M],i;for(i=0;i<M-1;i++)scanf("%d",&a[i]);a[M-1]=a[0];/************found************/for(i=1; i<M-1;i++)/************found************/if(a[i]<a[M-1])a[M-1]=a[i];printf("Max is %d\n",a[M-1]);return 02.将长整型数中每一位上为奇数的数依次取出,构成一个新数放在t中。
高位仍在高位,低位仍在低位。
例如,当s中的数为:87653142时,t中的数为:7531。
#include <stdio.h>main(){ int s, t, sx=1;int d;printf("\nPlease enter s:"); scanf("%d", &s);/************found************/t = 0;while ( s > 0){ d = s%10;/************found************/if (d%2 == 1){ t = d * sx + t;sx *= 10;}s /= 10;}printf("The result is: %d\n", t);3.求一维数组a中非素数之和。
例如:如果数组a的元素为:2,3,5,7,8,9,10,11,12,13,15,17,则程序的输出应为:Sum is: 54。
#include <math.h>#include <stdio.h>int main(){ int a[12]={2,3,5,7,8,9,10,11,12,13,15,17},i,j,k,s;/************found************/s=0;for ( i=0; i<12; i++){k=(int)sqrt(a[i]);for ( j=2;j <= k; j++)if (a[i] % j == 0)/************found************/break;if( j<=k )s += a[i];}printf("Sum is: %d\n",s);return 0;4. 统计具有M个元素的一维数组a中素数的个数。
程序阅读及填空(标准答案)⼀.程序阅读题1.若运⾏时输⼊100↙,写出以下程序的运⾏结果。
main ( ) { int a ;scanf(“%d”,&a);printf(“%s”,(a%2!=0)?”No”:”Yes”);}答案: Yes2.写出以下程序的运⾏结果。
main ( ){ int a=2,b=7,c=5;switch (a>0) {case 1: switch (b<0) {case 1: printf(“@”); break ;case 2: printf(“!”); break ;}case 0: switch (c==5) {case 1: pritnf(“*”) ; break ;case 2: printf(“#”) ; break ;default : printf(“#”) ; break ;}default : printf(“&”);}printf(“\n”);}答案: *&3.写出下⾯程序运⾏的结果。
main ( ){ int i,b,k=0 ;for (i=1; i<=5 ; i++) {b=i%2;while (b--==0) k++ ;}printf(“%d,%d”,k,b);}答案:2 04.写出下⾯程序运⾏的结果。
main ( ){ int k=1,n=263 ;do { k*= n%10 ; n/=10 ; } while (n) ; printf(“%d\n”,k);}答案:365.写出下⾯程序运⾏的结果。
{ int a=10,y=0 ;do {a+=2 ; y+=a ;if (y>50) break ;} while (a=14) ;printf(“a=%d y=%d\n”,a,y) ;}答案:a=16 y=60数组部分:1.写出下⾯程序的运⾏结果。
main ( )答案:{ int a[6][6],i,j ;for (i=1; i<6 ; i++)for (j=1 ; j<6 ; j++)a[i][j]=(i/j)*(j/i) ;for (i=1;i<6 ; i++) {for (j=1 ; j<6 ; j++)printf(“%2d”,a[i][j]) ;printf(“\n”);}}2.写出下⾯程序的运⾏结果。
(完整版)python期中考试试卷程序填空阅读填空程序试题一、程序填空1.小王编写了“字符串缩写”程序,实现如下功能:1.输入一串由英文字母和数字组成的字符串,2.如果字符串有连续字符构成的升序段(后面字符的ASCII值比前面的字符的ASCII值大1),则把升序段缩写成由第一个字符加上“—”和最后一个字符组成的新字符段,3.例如:字符串为“abcdf12345becomexy”,则缩写成“a-df1-5becomex-y”。
程序运行时,输入一串字符,输出缩写的字符串,程序运行效果如下图所示:实现上述功能的程序如下,请在程序划线处填入合适的代码。
s=input("请输入字符串s:")_______flag = Falseresult=" "for i in range( 0 , k-1):if ___________________ :result=result+s[i]+"-"flag = Trueelif ord(s[i]) ! = ord(s[i+1])-1:result=result+s[i]_____result=result + s[i+1]print("缩写后的字符串为:",result)划线处①处应该填入的语句为:;划线处②处应该填入的语句为:;划线处③处应该填入的语句为:。
2.请在空格处填写正确的代码,使程序完善。
实现功能:绘制y=x2-2x+ 1的图像#加载numpy模块并限简洁的别名为npimport numpy as np#加载matplotlib.pyplot模块并限简洁的别名为pltimport matplotlib.pyplot as plt#x在-7到9之间,每隔0.1取一个点x=np.arange(-7,9,0.1)_____ = x**2-2*x+1plt.plot(x,________)plt.title('y=x*x-2*x+1')plt.xlabel('x')plt.ylabel('y')plt._________3.阅读程序。
程序填空技巧
程序填空是程序设计中经常使用的一种技巧,它是指在给定的程序代码中,将一些关键的部分留空,需要我们根据需求填写相应的代码,从而得到正确的结果。
程序填空技巧的主要应用场景是在编写算法或者解决问题时,需要通过编程实现一些具体的功能。
在这个过程中,程序填空可以帮助我们快速地完成代码,提高编程效率。
下面是一些常见的程序填空技巧:
1. 使用注释:在程序中使用注释,标明填空的位置和需要填写的内容,这样可以方便我们在填空时快速找到需要填写的位置。
2. 利用代码提示:在编写代码时,编辑器会根据我们输入的代码自动提示可能的选项,这时我们可以从提示中选择合适的代码,填写到空白部分中。
3. 使用变量名:在程序中定义一些变量名,可以方便我们填写代码。
例如,我们可以在程序中定义一个变量名为“result”,然后在程序的空白部分中填写“result=1+2”,从而得到正确的结果。
4. 使用函数:在编写程序时,我们可以定义一些常用的函数,并将
其放到程序中。
这样,在填写代码时,我们可以调用这些函数,从而减少代码的复杂度。
5. 使用循环语句:在需要进行重复操作时,我们可以使用循环语句,使代码更加简洁和易于调试。
在填空时,我们可以根据需求选择合适的循环语句,从而得到正确的结果。
总的来说,程序填空技巧可以帮助我们快速地编写出正确的程序,提高编程效率和可读性。
当我们遇到一些需要编写重复性代码的情况时,可以尝试使用程序填空技巧,以更加优雅和简洁的方式解决问题。
一、程序填空题1.下列给定程序中,函数fun的功能是计算如下公式S=322−542+762−⋯−1n−12×n+12×n2直到2×n+12×n≤10−3,并且把计算结果作为函数值返回。
例如,若形参e的值为1e-3,则函数返回值为0.551690。
请在下划线处填入正确的内容并将下划线删除,使程序得出正确的结果。
#include <stdio.h>double fun(double e){ int i, k; double s, t, x; s=0; k=1; i=2;x=_1_/4;while(x _2_ e){ s=s+k*x;k=k* (-1);t=2*i;x=_3_/(t*t);i++;}return s;}main(){ double e=1e-3;printf("\nThe result is: %f\n",fun(e)); }【参考答案】(1) 3.0或(double)3 (2) > (3) (t+1)分析:本题考查基本算术运算时的类型转换。
填空1:变量x定义为double类型,而运算符"/"后面是整型数,所以给x赋值时,需要注意数据类型,此处不能将3.0写成3。
填空2:while循环语句的循环条件,根据题意确定循环变量应大于1e-3,因此此处应填">"。
填空3:表达式的通项是(2*i+1)/(2*i)2 ,由于程序中已定义t=2*i,所以此处应该填写(t+1)。
注意:本题填空1还可以运用强制类型转换来实现。
强制类型转换是通过类型转换运算来实现的。
其一般形式为:"(类型说明符) (表达式)"。
其功能是:把表达式的运算结果强制转换成类型说明符所表示的类型。
例如:(float) a 把a转换为实型(int)(x+y) 把x+y的结果转换为整型2.下列给定程序中,函数fun的功能是:计算如下公式前n项的和并作为函数值返回。
程序填空技巧
程序填空技巧是程序设计中非常重要的一项技能。
在编写程序时,我们经常需要在代码中留下一些空白,然后通过填写正确的代码来完成程序的实现。
程序填空技巧可以帮助我们更加高效地完成这项任务,提高代码编写的效率。
以下是几个程序填空技巧的建议:
1. 确定空白处需要填写的数据类型
在程序设计中,数据类型是非常基础的概念。
因此,当我们遇到程序填空时,首先需要确定空白处需要填写的数据类型。
一些常见的数据类型包括整数(int)、浮点数(float)、字符(char)和布尔(bool)等。
2. 查看空白处周围的代码
在程序填空时,我们需要先查看空白处周围的代码,以确定空白处需要填写的代码内容。
根据周围代码的逻辑关系,选择正确的代码填入空白处。
3. 利用代码提示
在编写代码时,我们可以利用代码提示来快速地找到需要填写的代码。
代码提示是一种非常有用的程序填空技巧,可以帮助我们快速地浏览代码库中的命令、变量和函数等。
4. 注意语法错误
在填空时,我们需要注意语法错误。
语法错误是指代码不符合语言规范,无法被编译器识别和执行的问题。
我们可以通过仔细阅读程序填空题目,确保代码的语法正确性。
总之,程序填空技巧是程序设计过程中必不可少的一项技能。
通过掌握这些技巧,我们可以更加高效地编写代码,提高代码编写的效率和质量。
【程序填空】功能:写一个函数,求一个字符串的长度,在main函数中输入字符串,并输出其长度。
len=length(str...);I.nt length ........(p)N.++..;P.++..;【程序改错】功能:将一个字符串中的大写字母转换成小写字母。
bool (char)......fun(char *c)fun= c;(return *c)..........puts(*p);(putchar(*p)).............【程序设计】功能:编写函数实现两个数据的交换,在主函数中输入任意三个数据,调用函数对这三个数据从大到小排序。
------------------------------------------------*/ #include<stdio.h>void wwjt();void swap(int *a,int *b){/**********Program**********//********** End **********/ }main(){int x,y,z;scanf("%d%d%d",&x,&y,&z);if(x<y)swap(&x,&y);if(x<z)swap(&x,&z);if(y<z)swap(&y,&z);printf("%3d%3d%3d",x,y,z);wwjt();}void wwjt(){FILE *IN,*OUT;int m,n;int i[2];IN=fopen("in.dat","r");if(IN==NULL){printf("Read FILE Error"); }OUT=fopen("out.dat","w"); if(OUT==NULL){printf("Write FILE Error"); }for(n=0;n<3;n++){for(m=0;m<2;m++){fscanf(IN,"%d",&i[m]);}swap(&i[0],&i[1]);fprintf(OUT,"%d\n",i[0]);fprintf(OUT,"%d\n",i[1]);}fclose(IN);fclose(OUT);}/*-------------------------------------------------------【程序填空】功能:输入3个数a,b,c,按从小到大的顺序输出。
'【程序填空】'-------------------------------------------------------'功能:下面的程序段用于实现以下功能:利用冒泡法将一组整数' 从小到大排序。
'-------------------------------------------------------Private Sub Form_Click()Const n = 15Dim a(1 To n) As Integer, work As BooleanDim i As Integer, j As Integer, x As IntegerRandomizeFor i = 1 To na(i) = Int((90 * Rnd) + 10)Next iFor i = 1 To nPrint a(i);Next iPrint'**********SPACE**********For i = n To 2 【?】step-1work = TrueFor j = 1 To i - 1If a(j) > a(j + 1) Thenx = a(j): a(j) = a(j + 1): a(j + 1) = x'**********SPACE**********【?】work=FalseEnd IfNext j'**********SPACE**********If work Then 【?】Exit ForNext iFor i = 1 To nPrint a(i);Next iEnd Sub答案1). Step -12). work = False 或work=0 或not work = true3). Exit For'功能:以下程序用于判断一个正整数(≥3)是否为素数。
'-------------------------------------------------------Private Sub Form_Click()n = InputBox("请输入一个正整数(≥3)")k = Int(Sqr(n))i = 2swit = 0'**********SPACE**********Do While i <= k And 【?】swit=0'**********SPACE**********If 【?】n Mod i =0 Thenswit = 1 …不是素数Else'**********SPACE**********【?】i = i + 1End IfLoopIf swit = 0 ThenPrint n; "是一个素数"ElsePrint n; "不是素数"End IfEnd Sub答案:1). swit = 02). n Mod i = 0 或n/i ★= ★n\i 或n/i ★=★int(n/i)3). i = ★i ★+★1'功能:本程序用于实现:从键盘接收一数字,判断其是否在数组' 中,如果在数组中则将其删除,否则显示该数字不在数组' 中。
'-------------------------------------------------------Private Sub Form_Click()Dim a(10) As Integer, x As IntegerFor i = 1 To 10a(i) = Int((Rnd * 90) + 10)Print a(i);Next iPrintx = InputBox("请输入要删除的整数")For i = 1 To 10'**********SPACE**********If a(i) = x Then 【?】Exit ForNext i'**********SPACE**********If 【?】i< 10 ThenFor k = i To 9'**********SPACE**********【?】a(k) = a( k + 1 )Next kPrint "删除后的数组:"For i = 1 To 9Print a(i);Next iElsePrint "该数字不在数组中"End IfEnd Sub答案:1). Exit For2). i<10 或10>i3). a(k) = a(★k ★+ ★1★)'功能:利用下面的过程求m!和m*n'------------------------------------------------------- Private Sub Form_Click()Dim m As Integer, n As Integerm = 2n = 3'**********SPACE**********【?】call find(m,n)End SubPrivate Sub find(x As Integer, y As Integer) Dim s, i As Integer'**********SPACE**********【?】s=1For i = 1 To xs = s * i'**********SPACE**********p=【?】x*yNext iPrint s, pEnd Sub答案:1). find m, n 或call find(m,n)2). s = 1 或s = 1:p=03). p★+★y 或x*y'功能:以下程序段利用随机函数生成15个10-100之间的整数,然后用选择法将其从小到大排序。
'-------------------------------------------------------Private Sub Form_Click()Const n = 15Dim a(1 To n) As IntegerDim i As Integer, j As Integer, t As Integer, min As Integer RandomizeFor i = 1 To n'**********SPACE**********a(i) =【?】Int((Rnd*100)+10)Next iFor i = 1 To nPrint a(i);Next iPrintFor i = 1 To n - 1'**********SPACE**********【?】t=iFor j = i + 1 To nIf a(j) < a(t) Then t = jNext j'**********SPACE**********If 【?】t <> i Thenmin = a(i): a(i) = a(t): a(t) = minEnd IfNext iFor i = 1 To nPrint a(i);Next iEnd Sub答案:1). Int(★100★*★Rnd★)★+★102). t=i3). t★<> ★I 或t<i 或i>t 或not t=i 或not i=t'功能:以下程序段利用随机函数生成15个10-100之间的整数,然后用选择法将其从小到大排序。
'-------------------------------------------------------Private Sub Form_Click()Const n = 15Dim a(1 To n) As IntegerDim i As Integer, j As Integer, t As Integer, min As IntegerRandomizeFor i = 1 To n'**********SPACE**********a(i) =【?】Int(100*RND())+1Next iFor i = 1 To nPrint a(i);Next iPrintFor i = 1 To n - 1'**********SPACE**********【?】t=iFor j = i + 1 To nIf a(j) < a(t) Then t = jNext j'**********SPACE**********If 【?】t <> i Thenmin = a(i): a(i) = a(t): a(t) = minEnd IfNext iFor i = 1 To nPrint a(i);Next iEnd Sub答案:1). Int(★100★*★Rnd★)★+★102). t=i3). t★<> ★I 或t<i 或i>t 或not t=i 或not i=t' ***' *****' *******' *****' ***' *''-------------------------------------------------------Private Sub Form_Click()Dim i%, j%, k%For i = 3 To 0 Step -1Print " ";Next j'**********SPACE**********For k = 5 To 【?】2 * i - 1 Step -1Print "*";Next kPrintNext iFor i = 0 To 3For j = 0 To 2 * i + 2'**********SPACE**********【?】Print “”Next jFor k = 0 To 4 - 2 * iPrint "*";Next k'**********SPACE**********【?】PrintNext iEnd Sub答案:1). 2★*★i★-★1★Step★-12). Print " "; 或? " ";3). Print 或?Text1.【?】MaxLength = 8'**********SPACE**********Text1.【?】passwordchr = "*"'【程序填空】'------------------------------------------------------- '功能:下面的程序段用于打印出以下图形'' *' ***' *****' *******' *****' ***' *'------------------------------------------------------- Private Sub Form_Click()Dim i%, j%, k%For j = 0 To 2 - iPrint " ";Next j'**********SPACE**********For k = 1 To 【?】2 * i +1Print "*";Next kPrintNext iFor i = 0 To 2For j = 0 To i'**********SPACE**********【?】Print “”Next jFor k = 0 To 4 - 2 * iPrint "*";Next k'**********SPACE**********【?】PrintNext iEnd Sub答案:1). 2★*★i★+★12). Print " "; 或form1.print " "; 或? " ";3). Print 或form1.Print 或?'功能:以下程序段用于输出杨辉三角:结果样式如图1 '-------------------------------------------------------Private Sub Form_Click()Const n = 10Dim arr(n, n) As IntegerFor I = 1 To narr(I, I) = 1'**********SPACE**********【?】arr(i, 1) = 1Next IFor I = 3 To nFor j = 2 To I - 1'**********SPACE**********arr(i, j) =【?】★arr(i - 1, j - 1)★+★arr(i - 1, j) Next jNext IFor j = 1 To I'**********SPACE**********? 【?】arr(i, j) & " ";Next jPrintNext IEnd Sub'功能:以下程序段用于实现:输入两个正整数m和n,求其最大' 公因数和最小公倍数。