程序改错(1)
计算机程序改错题,及答案
11 *程序名：TEST.prg *检索选修课程门数等于３门或３门以上,每门课程成绩大于或等于７０分的每个学生的 *学号,姓名,性别,平均成绩,最低分和选课门数,并将结果存储到表NEW_TEST中． *以下程序有三处错误，请改正 OPEN DA TABASE SDB SELECT STUDENT.学号,姓名,性别,A VG(成绩) 平均成绩,MIN(成绩) 最低分,COUNT(*) 选课门数; FROM STUDENT,SC; WHere STUDENT.学号= SC.学号AND 成绩>= 70 ; &&**********Error********** GROUP BY STUDENT.学号HA VING count(课程号) >= 3; &&**********Error********** inTO table NEW_TEST &&**********Error********** CLOSE ALL 9 *程序名：dbtest3.prg *定义一个视图VS1, *检索选课门数是3门以上的每个学生的学号、姓名、平均成绩、最低分、选课门数和院系编号, *并按平均成绩降序排序. *以下程序有三处错误，请改正 SET TALK OFF SET SAFETY OFF open DATABASE SDB &&****Error***修改本行的语法错误,不许注释掉本行或删除本行 CREATE VIEW VS1 SELECT STUDENT2.学号, 姓名, A VG(成绩) 平均成绩, MIN(成绩) 最低分, COUNT(*) 选课门数, 院系编号; FROM STUDENT2, sc; &&*************Error************* WHERE STUDENT2.学号= SC.学号; GROUP BY SC.学号HA VING COUNT(课程号) > 3; ORDER BY 平均成绩desc &&*************Error************* CLOSE DATABASE RETURN i=2 create table four(结果I) do while i<=1000 if i%3=0 insert into four values(i) &&错误语句请修改 endif
程序改错C
程序改错 ================================================== 题号：7471 /*------------------------------------------------------ 【程序改错】：只允许修改错误代码，其他代码不允许修改！ -------------------------------------------------------- 功能：计算正整数num的各位上的数字之积。 例如：若输入：252，则输出应该是：20。 若输入：202，则输出应该是：0。 ------------------------------------------------------*/ #include
num/=10; 【或】 num=num/10; 位置 3: } while(num) ; 【或】 while(num!=0) 题号：7383 /*------------------------------------------------------ 【程序改错】：只允许修改错误代码，其他代码不允许修改！ -------------------------------------------------------- 功能：统计出若干个学生的平均成绩，最低分以及得最低分的人数。例如：输入10名学生的成绩分别为92，87，68，56，92，84，67， 75，92，66，则输出平均成绩为77.9，最低高分为56，得最低分的人数为1人。 ------------------------------------------------------*/ #include "stdio.h" float Min=0; int J=0; float fun(float array[],int n) { int i;float sum=0,ave; Min=array[0]; for(i=0;i 程序改错题 （注意：每小题只有1行有错误，答题时请指出错误位置并给出改正结果）1． 输出计算结果。 main() { int a=b=10; a+=b+5; b*=a+=10; printf("%d%d\n",a,b); } 2． 输出计算结果。 #include 输出程序运行结果。 #include 【程序改错】 1.功能：利用递归函数调用方式，将所输入的5个字符，以相反顺序 打印出来。 char next; next=getchar(); palin(n-1); 2.功能：求广义菲玻那契级数的第n项。广义菲玻那契级数的前n 项为： 1，1，1，3，5，9，17，31，…… 项值通过函数值返回 main ( )函数。 例如：若 n = 15，则应输出：The value is: 2209。 for (k=4; k<=n; k++) a=b; return d; 3.功能：根据整型形参m，计算如下公式的值： y=1/2＋1/8＋1/18＋...＋1/2m*m double y=0.0; 4.功能：编制统计营业员一天的营业额的程序,设程序采用一个循环 实现，每次循环输入一笔交易金额并累计营业额。由于营 业员一天完成的交易次数是不确定的，为此以最后附加输 入一笔0或负数交易额作为交易金额已全部输入结束的标志。 float sale,sigma; scanf("%f",&sale); sigma=sigma+sale; 5.功能：读取7个数（1-50）的整数值，每读取一个值，程序打印出该值个数的＊。while(n<8) while(a<1||a>50); for(i=0;i 第1题（10.0分）题号:421 /*-------------------------------- 【程序改错】 -------------------------------- 功能：给一个不多于5位的正整数，要求： 一、求它是几位数， 二、逆序打印出各位数字。 --------------------------------*/ #include"stdio.h" main( ) { /**********FOUND**********/ long a,b,c,d,e,x, scanf("%ld",&x); a=x/10000; /**********FOUND**********/ b=x/10000/1000; c=x%1000/100; d=x%100/10; e=x%10; /**********FOUND**********/ if (a==0) printf("there are 5, %ld %ld %ld %ld %ld\n",e,d,c,b,a); else if (b!=0) printf("there are 4, %ld %ld %ld %ld\n",e,d,c,b); else if (c!=0) printf(" there are 3,%ld %ld %ld\n",e,d,c); else if (d!=0) printf("there are 2, %ld %ld\n",e,d); else if (e!=0) printf(" there are 1,%ld\n",e); getch(); } 答案： 1). long a,b,c,d,e,x; 2). b=x%10000/1000; 3). if (a!=0) 或 if (!a) 第2题（10.0分）题号:417 /*-------------------------------- 【程序改错】 -------------------------------- 功能：下题是一段有关结构体变量传递的程序. --------------------------------*/ #include "stdio.h" struct student { int x; char c; } a; main() { a.x=3; /**********FOUND**********/ a.c='a' f(a); /**********FOUND**********/ printf("%d,%c",a.x,b.c); getch(); } f(struct student b) { b.x=20; /**********FOUND**********/ b.c=y; } 答案： 1). a.c='a'; 2). printf("%d,%c",a.x,a.c); 3). b.c='y'; 第1题（10.0分）题号:440 /*-------------------------------- 【程序改错】 -------------------------------- 【程序改错-1】 题目：在一个一维整型数组中找出其中最大的数及其下标。程序中共有4条错误语句，请改正错误。『错误答案』： 1 int fun(int *a,int *b,int n) 2 *b=c-a;} 3 scanf("%d",&a[i]); 4 max=fun(a,&p,N); 【程序改错-2】 题目：为一维数组输入10个整数；将其中最小的数与第一个数对换，将最大的数与最后一个数对换；输出数组元素。程序中共有4条错误语句，请改正错误。 『错误答案』： 1 scanf("%d",p++); 2 max=p; 3 if(★max★==★arr ★) 4 for(i=0;i 程序改错 1.计算下列分段函数的值，输入x输出y 的值 f(x)= x*2 x<0且x≠-3 sin(x) 0<=x<10 且x≠2且x≠3 x*x+x-1 其他 1)scanf(“%f,&x); 2)y=sin(3*x); 3)printf(“%f\n”,y); 2.输入两个整数n1,n2(n1 5.从键盘输入10个学生的成绩，统计最高分max，最低分min和平均分avg。 1)float a[8],min,max,avg; 2)scanf(“%f”,&a[i]); 3)max=min=avg=a[0]; 4)if(a[i] 12592 '题目 : 编程求一个十进制整数n 的各位数字之和，设n 为小于或等于 5 位的数。'------------------------------------------------ Option Explicit Private Sub Form_Click() Dim N As Integer, Sum As Integer, S1 As String, S2 As String Dim i As Integer, Ch As String Sum = 0 N = InputBox(" 输入整数n") S1 = Str(N) S1 = Trim(S1) For i = 1 To Len(S1) '**********ERROR********** Ch = Mid(N, i, 1) '**********ERROR********** Sum = Val(Ch) Next i Print " 该整数的各位数之和是： "; Sum End Sub 答案： Ch=Mid(S1 , i , 1) Sum = Sum + Val(Ch) 12610'题目：程序功能根据输入的学习成绩, 分别显示优秀 (90 分以上 ), 良好 (75 分以上 ), 及格 (60 分以上 )不及格四个等级 . '------------------------------------------------ Option Explicit Private Sub Form_Click() Cls Dim i As Integer i = InputBox(" 请输入学习成绩") Select Case i '**********ERROR********** Case 0 < i < 100 MsgBox " 成绩应该在0--100 之间 """ '**********ERROR********** Case 90 Print " 优秀 " Case 75 To 89 Print " 良好 " Case 60 To 74 Print " 及格 " '**********ERROR********** Case MsgBox " 不及格 ", vbCritical End Select End Sub 答案： Case 100 < x or x < 0 Case 90 to 100 Case Else 12616.题目：求 s=1!+3!+5!+7! ，阶乘的计算用Function 过程 fact 实现 . '------------------------------------------------ Option Explicit Private Sub Form_Click() Dim i As Integer, s As Integer '**********ERROR********** For i = 1 To 7 s = s + fact(i) Next i Print s End Sub '**********ERROR********** Public Function fact() Dim t As Integer, i As Integer t = 1 For i = 1 To n t = t * i Next i '**********ERROR********** fact = i End Function 答案： For i = 1 To 7 Step 2 Public Function fact%(n%) fact = t 12620 题目 :编程实现从左到右的滚动字幕，滚动的速度由滚动条控件来控制。 '------------------------------------------------ Option Explicit Private Sub HScroll1_Scroll() '**********ERROR********** Timer1.Interval = HScroll1.Min - HScroll1.Value End Sub Private Sub Timer1_Timer() '**********ERROR********** If Label1.Left <= Form1.Width Then '**********ERROR********** 程序改错练习题 下面每个程序的划线处有语法或逻辑错误，请找出并改正，使程序符合题意。 １．求1?2?3?4? ?n main() { int sum; 正确：int sum=1; int n,i=1; scanf("%d",n); scanf(“%d”,&n); printf(“\n”); while(i main() { float a,b; int c; float c; scanf("%f,%f",&a,&b); c=sum(a,b); printf("\nSum is %f",sum); printf("\nSum is %f",c); } 4. x , y两个数中，让x中存较大的数，y存较小的数 #include '以下程序段用于输出杨辉三角:结果样式如图1 ' Private Sub Form_Click() Const n = 10 Dim arr(n, n) As Integer For I = 1 To n arr(I, I) = 1 '**********SPACE********** 【arr(I, 1) = 1】 Next I For I = 3 To n For j = 2 To I - 1 '**********SPACE********** arr(i, j) =arr(i-1,j-1)+arr(i-1,j) Next j Next I For I = 1 To n For j = 1 To I '**********SPACE********** 【print arr(I,j)】 Next j Print Next I End Sub Option Explicit '------------------------------------------------ '【程序改错】 '------------------------------------------------ '题目：用自定义函数的方法求sum（x），求当-1≤x≤1时，' sum（x）=x/2！+x^2/3!+x^3/4!+……+x^n/(n+1)!， ' 当x〉1或x〈-1时，函数值为0。当n〈=0时，输入数' 据错误。X、N都是由用户输入。 '------------------------------------------------ '注意：不可增加或删除程序行，也不可以更改程序结构 '------------------------------------------------ Private Sub Command1_Click() Dim s As Single Dim n As Integer, x As Single, k As Integer n = Val(InputBox("Please input a integer value:")) （一）功能：用选择法对数组中的n个元素按从小到大的顺序进行排序。#include "stdio.h" #define N 20 void fun(int a[], int n) { int i, j, t, k; for (j = 0 ;j < n-1 ;j++) { /**********ERROR**********/ k = j for (i = j+1;i < n; i++) /**********ERROR**********/ if(a[i] >a[k]) /**********ERROR**********/ k=j; t = a[k] ; a[k] = a[j] ; a[j] = t; } } main() { int a[N]={9,6,8,3,-1},i, m = 5; printf("排序前的数据:") ; for(i = 0;i < m;i++) printf("%d ",a[i]); printf("\n"); fun(a,m); printf("排序后的数据:") ; for(i = 0;i < m;i++) printf("%d ",a[i]); printf("\n"); } 【参考答案】 k = j; 【参考答案】 if(a[i] < a[k]) if(a[k] > a[i]) 【参考答案】 k = i; （二）功能：求广义菲玻那契级数的第n项。广义菲玻那契级数的前n 项为： 1，1，1，3，5，9，17，31，…… 项值通过函数值返回 main ( )函数。 例如：若 n = 15，则应输出：The value is: 2209。 #include "conio.h" #include "stdio.h" long fun ( int n ) { long a=1, b=1, c=1, d=1, k; /**********ERROR**********/ for (k=4; k 【程序改错】 1.下列给定程序中函数fun的功能是：删除s所指字符中所有的小写字母c 。 请改正程序中的错误，使它能得出正确的结果。 #include 1 已知C的公式表示如下: ' n! ' C=------------------ ' (n-m)!*m! 1). x=1 2). x=x*j 3). C = fac(n) / ( fac(n - m) * fac(m) ) 2题目：从计算机输入三个数, 找出中间数 1). If x < y Then 2). If y >= z Then 3). ElseIf x >= z Then 3'题目：求s=2!+4!+6!+8!，阶乘的计算用Function过程 ' fact实现 1). For i = 2 To 8 Step 2 2). Public Function fact(ByVal n As Integer) 3). fact = t 4 题目:编程求一个十进制整数n的各位数字之和，设n为小于或等于5位的数。 1). S1 = Trim(S1) 2). Ch = Mid(S1, i, 1) 3). Sum = Sum + Val(Ch) 5已知自然对数的底数e的级数表示如下: 1). x = x * i 2). n = 0 3). Loop While item >= 0.00000001 6下面的程序段用于实现以下功能：建立一顺序文件，存放10名同学的学号和三门功课成绩，显示 1). Open "c:\2.txt" For Output As #1 2). Open "c:\2.txt" For Input As #1 3). Input #1, n0, c1, c2, c3 7给定年号与月份，判断该年是否闰年,并根据给出的月份来判断是什么季节和该月有多少天？ 1). If Year Mod 4 = 0 And Year Mod 100 <> 0 Or Year Mod 400 = 0 Then 2). Flag = 1 3). Select Case Month 8：一个两位的正整数，如果将它的个位数与十位数对调，则产生另一个正整数，我们把后者叫做前者的对调数，现给定一个两位的正数 1). h = k - g * 10 : m = h * 10 + g 2). For n = 11 To 99 3). End If 9程序功能为求解一元二次方程的实根，请修正程序中错误 1). work = b ^ 2 - 4 * a * c 2). root1 = (-b + Sqr(work)) / (2 * a) 3). root2 = (-b - Sqr(work)) / (2 * a) 10随机产生n个两位正整数（n由输入对话框输入，且n>0）， ' 求出其中的偶数之和，并在标签框Label1上显示。 1). sum=0 2). rnddat = (10 + Int(90 * Rnd)) 3). If rnddat Mod 2 = 0 Then 11由输入对话框输入n（设n为大于零且小于30的自然数） 1). Do While n <= 0 Or n >= 30 2). k = k + 1 3). Loop Until k >= n 12判断给定的年月日是该年中的第几天。 1). Dim a(1 To 12) As Integer 2). days = days + a(i - 1) 3). days = days + day 13设窗体中有图片框Pic1，现要求在其中绘制10个同心圆， ' 然后将此图以Test.BMP作文件名存入磁盘。 1). for i=0 to 9 2). Do Until I < 0 3). I = I - 1 14给定三角形的三条边，计算三角形的面积。要求 ' 程序首先判断给定的三条边能否构成三角形。 1). If a + b < c Or b + c < a Or a + c < b Then 2). t = (a + b + c) / 2 3). s = Sqr(t * (t - a) * (t - b) * (t - c)) 15以下程序段用于计算5的N次方。 1). k=1 2). s=1 3). Loop 16随机产生n个两位正整数（n由输入对话框输入，且n>0）， ' 求出其中的偶数之和，并在标签框Label1上显示。程序改错题
c语言程序改错
程序改错1
程序改错2
程序改错1
程序改错包括答案版本.docx
程序改错练习题
VB程序设计例题-程序改错程序填空程序设计
程序改错完整版---C语言
程序改错
程序改错