所有改错和表单题目.docx

上传人:b****6 文档编号:3754911 上传时间:2022-11-25 格式:DOCX 页数:16 大小:20.40KB
下载 相关 举报
所有改错和表单题目.docx_第1页
第1页 / 共16页
所有改错和表单题目.docx_第2页
第2页 / 共16页
所有改错和表单题目.docx_第3页
第3页 / 共16页
所有改错和表单题目.docx_第4页
第4页 / 共16页
所有改错和表单题目.docx_第5页
第5页 / 共16页
点击查看更多>>
下载资源
资源描述

所有改错和表单题目.docx

《所有改错和表单题目.docx》由会员分享,可在线阅读,更多相关《所有改错和表单题目.docx(16页珍藏版)》请在冰豆网上搜索。

所有改错和表单题目.docx

所有改错和表单题目

试卷方案:

所有改错和表单题目

试卷总分:

150分

共有题型:

2种

一、程序改错共10题(共计100分)

第1题(10.0分)

*-----------------------------------------------

*【程序改错】

*-----------------------------------------------

*题目:

下列程序用来产生20个0~100之间的随机整数,

*并找出其中的最大数和最小数,输出时20个随机

*整数*均在一行显示,下一行显示最大数和最小数。

*要求:

*

(1)将下列程序输入到项目中的程序文件pcode中,并

*对其中的2条错误语句进行修改。

*

(2)在修改程序时不允许修改程序的总体框架和算法,

*不允许增加或减少语句的数目。

*------------------------------------------------

DIMENSIONA(20)

FORI=1TO20

A(I)=INT(RAND()*100)

ENDFOR

Mmax=A

(1)

Mmin=A

(1)

?

A

(1)

FORi=2to20

***********FOUND**********

?

STR(A(I),3)

IFMmax

Mmax=A(i)

ENDIF

IFMmin>A(i)

Mmin=A(i)

ENDIF

ENDFOR

***********FOUND**********

?

"最大数是:

"+Mmax+"最小数是:

",Mmin

 

第2题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

下列的程序的功能是:

删除字符串(不包括汉字)中的空格

*并将它按字符从大到小的顺序排列后输出。

例如:

字符串

*"BCefA",输出结果为“feCBA”。

要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

clear

x='BCefA'

y=''

x=strtran(x,space

(1),space(0))

n=len(x)

dimensiona(n)

fori=1ton

a(i)=left(x,1)

***********FOUND**********

x=substr(x,i)

endfor

=asort(A)

***********FOUND**********

forj=1ton

y=y+a(j)

endfor

?

y

 

第3题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

下列的程序功能是:

统计一个字符串中包含的汉字、英文

*字母及其他字符个数。

*要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

c="数据库"

store0tohz,yw,qt&&变量分别用于汉字、英文字母和其他字符计数

***********FOUND**********

dowhilec>0

x=asc(left(c,1))

ifx>127

hz=hz+1

c=subs(c,3)

else

ifx>64andx<91orx>96andx<123

yw=yw+1

else

qt=qt+1

endif

***********FOUND**********

c=subs(c,3)

endif

enddo

waitwind"汉字:

"+str(hz,4)+"英文字母:

"+str(yw,4)+"其他字符"+str(qt,4)

 

第4题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

完数是指数n的各因子(1视为因子,n不视为因子)之和正好

*等于该数本身。

例如:

6为完数(因子为1、2、3,且1+2+3=6)。

*下列程序的功能是:

找出1000以内的所有完数,并将找出的

*完数及该数的所有因子输出。

输出结果形式为:

*6,1,2,3

*28,1,2,4,7,14

*要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

clear

fori=1to1000

m=0

s=''

forj=1toi-1

ifi/j=int(i/j)

m=m+j

***********FOUND**********

s=s+','+j

endif

endfor

ifi=m

?

i

***********FOUND**********

?

s

endif

endfor

 

第5题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

下列的程序功能是:

求出不超过6位数的Armstrong数。

所谓

*Armstrong数是指一个n位数的正整数,它的每位数字的n次方

*之和等于该数本身。

例如:

153=1^3+5^3+3^3要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

clear

form=1to100000

n=len(allt(str(m)))

x=0

fory=1ton

c=substr(allt(str(m)),y,1)

***********FOUND***************************************

x=x+val(c)*n

endfor

***********FOUND***************************************

ifn=x

?

'Armstrong数',m

endif

endfor

 

第6题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

下列的程序用来产生30个0~100之间的随机整数,并且找出

*其中的最大偶数和最小奇数

*要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

clear

dimensiona(30)

fori=1to30

***********FOUND**********

a(i)=int(rand()*200)

endfor

Mmax=-1

Mmin=100

fori=1to30

?

?

str(a(i),3)

ifMmax

Mmax=a(i)

***********FOUND**********

else

ifMmin>a(i)andmod(a(i),2)=1

Mmin=a(i)

endif

endfor

?

"最大偶数:

",iif(Mmax=-1,"无",Mmax)

?

"最小奇数:

",iif(Mmin=100,"无",Mmin)

 

第7题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

下列的程序功能是:

在屏幕上显示如图所示的菱形。

*A

*BBB

*CCCCC

*DDDDDDD

*EEEEEEEEE

*FFFFFFFFFFF

*FFFFFFFFFFF

*EEEEEEEEE

*DDDDDDD

*CCCCC

*BBB

*A

*

*要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

settalkoff

c="ABCDEF"

clear

fori=1tolen(c)

?

space(10-i)

forj=1to2*i-1

***********FOUND**********

?

?

subs(c,i)

endfor

endfor

***********FOUND**********

fori=len(c)to1

?

space(10-i)

forj=1to2*i-1

?

?

subs(c,i,1)

endfor

endfor

 

第8题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*下列程序的功能是:

第一个循环随机生成30个大写英文字母,并且存放到数组C中,

*第二个循环实现数组C中30个元素内容的排序(从小到大)。

*要求:

*①将下列程序输入到项目中的程序文件pcode中,并对其中的2条错误语句进行修改;

*②在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。

*-------------------------------------------------------

CLEAR

DIMENSIONc(30)

FORi=1TO30&&第一个循环

n=CHR(64+MAX(1,MOD(INT(RAND()*100),27)))

c(i)=n

ENDFOR

FORi=1TO30&&第二个循环

m=c(i)

FORt=i+1TO30

***********FOUND**********

IFm

c(i)=c(t)

c(t)=m

m=c(i)

ENDIF

***********FOUND**********

ENDDO

ENDFOR

DISPLAYMEMOLIKEc*

 

第9题(10.0分)

*----------------------------------------------------------------------------

*[程序改错]

*题目:

下列程序的功能是将小写金额(假设小于10万且无小数位)转换为

*中文大写形式。

例如:

213转换为“贰佰壹拾叁元”,3012转换为“叁仟零佰拾贰元”。

*要求:

*

(1)将下列程序输入到项目中的程序文件prode中,并对其中的2条错误语句进行修改。

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许增删语句。

*----------------------------------------------------------------------------

nmoney=10249

cmoney=allt(str(nmoney))

cstring1='零壹贰叁肆伍陆柒捌玖'

cstring2='万仟佰拾元'

***********FOUND**********

cresult=0

forn=1tolen(cmoney)

***********FOUND**********

c=substr(cmoney,n)

cresult=cresult+subs(cstring1,val(c)*2+1,2)+subs(cstring2,n*2-1,2)

endfor

waitwindows'大写金额为:

'+cresult

 

第10题(10.0分)

*-------------------------------------------------------

*【程序改错】

*-------------------------------------------------------

*题目:

下列的程序功能是:

第一个循环随机生成10个大写英文字

*母,并且存放到数组C中,第二个循环将数组C中10个元素

*排序(从小到大)。

要求:

*

(1)将下列程序输入到项目的程序文件pcode中,并对其中的

*2条错误语句进行修改;

*

(2)在修改程序时,不允许修改程序的总体框架和算法,不允许

*增加或减少语句数目。

*-------------------------------------------------------

clear

n=10

dimensionc(n)

fori=1ton

c(i)=chr(65+int(rand()*26))

endfor

DISPLAYMEMOLIKEc*

forj=2ton

m=c(j)

fort=1toj-1

ifm

fork=jtot+1step-1

***********FOUND**********

c(k)=c(k+1)

endfor

c(t)=m

exit

endif

endfor

***********FOUND**********

enddo

DISPLAYMEMOLIKEc*

 

二、VF窗体设计共5题(共计50分)

第1题(10.0分)

请在项目JXGL中实现关于查询和表单的2道操作题:

1.建立查询chaxun

已知学生表(xs)其中含学号(xh,c)、姓名(xm,c)等字段;

成绩表(cj)含学号(xh,c)、成绩(cj,n)等字段,

每条记录为一位学生一门课程的考试成绩。

基于xs表和cj表查询成绩优良的学生

(注:

'成绩优良'是指平均成绩大于或者等于80,且最低成绩大于或等于65。

要求:

(1)输出学号、姓名、平均成绩和最低成绩(字段名依次分别为xh、xm、pjcj、zdcj),

查询结果按平均成绩降序排列

(2)保存查询为chaxun.qpr

2.修改表单forma,表单运行结果如图所示

要求:

(1)修改表单的基本属性,使得表单运行时自动居中(1分),标题为'Myform'(1分),

且作为顶层表单(2分)。

(2)在表单的init事件中,在指定位置编写二行代码,分别使得该文本框显示当前日期

(3分),并且文本框的数据不可修改,但能获得焦点(3分)

(3)已知组合框和列表框的rowsourcetype属性值都为3-SQL语句,

并依此修改组合框的Rowsouce属性,使得其可以读取学生表中不同的籍贯 

(重复值仅显示一次),参考代码:

select_________fromxs______cursortemp001(5分)

(4)参考下面的代码,在组合框的interactivechange事件中为列表框的rowsource属性设

定值,使得在选择不同的系别时,该系别的所有学生能在列表框中显示。

参考代码:

this.______._______.rowsource='selectxmfromxswherejg=this.______into______temp002'(5分)

 

第2题(10.0分)

请在项目JXGL中实现关于查询和表单的2道操作题:

1.建立查询chaxun

已知Jc表包含:

出版社名称(cbsmcc)出版年月(cbnfc)定价(djn)等字段

基于jc(教材)表统计各出版社2000年以后(含2000年),出版的教材种数及平均定价.

要求:

(1)输出出版社名称、教材种数、平均定价(cbsmc、jczs、pjdj);

查询结果按教材种数降序排序;输出去向为屏幕(即主窗口)

(2)将查询保存为chaxun.qpr

2.修改表单forma

要求:

1)修改表单的基本属性,使得表单运行时自动居中(1分),

 且没有最大化、最小化(2分),且作为顶层表单(2分)。

2)在表格的init事件中,在指定位置写上代码,使得该表单一运行实现如图所示的

 单列背景为红色(3+3分)。

3)如图所示,设置相关属性,使得表格的首列标题为'学号',并居中(2+2分)

4)修改命令按钮的属性,使得显示如图所示的'退(X)出'(2分),

在相应事件中编写代码,当用户单击该按钮时,自动退出该表单(3分)

 

第3题(10.0分)

请在项目JXGL中实现关于查询和表单的2道操作题:

1.建立查询chaxun

基于XS表和CJ表统计所有已登记的成绩中,有两门或两门以上课程不合格的

学生的总课程门数和成绩不合格门数。

要求:

(1)输出字段为:

XH、XM、总门数、不合格门数(输出显示xh,xm,zms,bhgms),

  查询结果按不合格门数降序排序。

(注:

'不合格'是指成绩小于60)。

(2)保存查询为chaxun.qpr

2.修改表单forma

要求:

1)修改表单的基本属性,使得表单运行时自动居中(2分),标题为'MyForm'(2分)

并边框格式为'固定对话框'即,不能调整该表单边框(2分)。

2)修改选项按钮组中的选项按钮属性,显示如图所示(3分),

设置选项按钮组值,使得其值为字符型的'女'(3分)

3)设置表格的recordsourcetype属性为'4-SQL说明'(2分)

4)依据以下示例代码,为选项按钮组的interactivechange编写代码,

当用户选择不同的性别时,将在表格中显示xs表中该性别所有学生的所有字段。

示例代码:

thisform.grid1.__________='select_______fromxswherexb=________intocurst003'(2分+2分+2分)

 

第4题(10.0分)

请在项目JXGL中实现关于查询和表单的2道操作题:

1.建立查询chaxun

工资表(GZ)含有工号(gh,C)、基本工资(jbgz,N)、岗位津贴(gwjt,N)、

综合津贴(zhjt,N)、住房补贴(zfbt,N)等字段。

教师表(js)含工号(gh,C)、院系专业代码(yxzydm,C)等字段。

基于JS表和GZ表查询各院系专业教师人数和应发工资总额。

要求:

(1)查询输入字段为yxzydm、人数、应发工资总额;查询结果按应发工资总额降序排序,

且仅输出应发工资总额最多的前三个院系专业;输入去向为表文件TEMP。

注:

应发工资总额=jbgz+gwjt+zhjt+zfbt

(2)将查询保存为chaxun.qpr

2.修改表单forma,运行界面如图所示。

(1)修改表单的基本属性,使得表单运行时自动居中(2分),

且为没有最大化按钮(2分)。

(2)修改组合框的属性,将组合框的列数属性设置为2(3分);

已知组合框的rowsourcetype属性=6-字段,修改组合框的rowsource属性,

组合框中显示学生(xs)的学号(xh)和姓名(xm)。

(3分)。

(3)修改两个文本框的属性,文本框均只能获得焦点,不能更改内容(只读)(2分)。

(4)参考下面的代码,在组合框的interactivechange事件中为2个文本文本框设定值,

 使得在选择不同的学生时,查询出该同学的总分和均分,并在text1中显示该学生的总分,

 在text2中显示该学生的均分。

 (2分+2分+2分+2分)

 示例代码:

 selectavg(cj.cj),______fromcjwherexh=_______into_____abc

thisform.text1.value=abc(1,1)

thisform.text2.value=____________

 thisform.refresh

 

第5题(10.0分)

请在项目JXGL中实现关于查询和表单的2道操作题:

1.建立查询chaxun

已知教师(js)表存储了每名教师的基本信息,其中含院系专业代码(yxzydm,C)、

职称(zc,C)、出生日期(csrq,D)等字段。

院系专业(yxzy)为院系专业代码与名称对照表,含院系专业代码(yxzydm,C)、

院系名称(yxmc,C)等字段。

基于js表和yxzy表统计各院系职称为教授的人数和平均年龄。

要求:

(1)输出院系名称、教授人数和平均年龄(字段名依次分别为yxmc、rs和pjnl),

查询结果按平均年龄降序排列。

(注:

教师的年龄等于当前系统日期的年份减去出生日期的年份)

(2)将查询保存为chaxun.qpr

2.修改

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 高中教育 > 语文

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1