算法会考模拟操作题.docx
- 文档编号:23030888
- 上传时间:2023-04-30
- 格式:DOCX
- 页数:15
- 大小:85.86KB
算法会考模拟操作题.docx
《算法会考模拟操作题.docx》由会员分享,可在线阅读,更多相关《算法会考模拟操作题.docx(15页珍藏版)》请在冰豆网上搜索。
算法会考模拟操作题
操作题复习DimiAsInteger,sAsInteger,kAsInteger
s=0
k=1
Fori=1To100
s=s+k*i
k=-k
Nexti
func=s
1.编程求2+4+6+...+100的和
Functionfunc(n)
DimpAsBoolean,iAsInteger
p=True
Fori=2Ton/2
IfnModi=0Thenp=False
Nexti
IfpThenfunc="yes"Elsefunc="no"
EndFunction
2.编程求s=1+3+5+...+99的和
Functionfunc()
DimiAsInteger,sAsInteger
s=0
Fori=2To100Step2
s=s+i
Nexti
func=s
EndFunction
3.编程求:
1-2+3-4+......99-100的值
Functionfunc()
DimiAsInteger,sAsInteger
s=0
Fori=1To99Step2
s=s+i
Nexti
func=s
EndFunction
4.编程求:
1+2+3+......+m>=12345678中最小的m
Functionfunc(n)
DimwAsSingle,kAsSingle,pAsSingle
w=15
p=0.225
Ifn<500Thenk=1
Ifn>=500Andn<1000Thenk=0.95
Ifn>=1000Andn<3000Thenk=0.9
Ifn>=3000Thenk=0.85
func=w*n*k*p
EndFunction
5.编程求N!
N!
=1*2*3......*N (N<=10)
6.给定一个正整数n(1 如果是质数则输出“yes”,否则输出“no” 如: 13 yes 7.编程求1~n之间的共有多少个数是质数。 (n为整数,n<5000) 8.请你为某汽车运输公司编制一个计算运输费用的程序。 运输费用的计算方法是距离愈远,每公里运价愈低,如下表所示: 距离s<500公里 折扣=0% 500= 1000= s>=3000 折扣=15% 如果运输的货物重为15吨,每吨运价为0.225元,请根据不同的运输距离计算出运费 9.输入一个的年号,判断是否为闰年,如果是则输出"Y",否则输出"N"。 提示: 闰年的条件: 年号能被400整除;或者能被4整除而不能被100整除 Functionfunc(n) IfnMod400=0OrnMod4=0AndnMod100<>0Then func="y" Else func="n" EndIf EndFunction 10. 某学校期末对学生进行综合评价,并将评价的结果转换为具体的分数(整型)。 如果有5名同学的分数,请编程序按从大到小排序 Functionfunc(n) DimsAsLong,iAsInteger s=1 Fori=1Ton s=s*i Nexti func=s EndFunction 例如: 输入: 1 2 3 4 5 输出: 5 4 3 2 1 格式要求: 输出的数据之间用一个空格字符分隔,数据序列前后没有空格。 11. Faibonacci数列,前n项数值为0,1,1,2,3,5,...,其规律是: 编程求数列的第30项的值Dimk(5)AsInteger,tAsInteger k (1)=a k (2)=b k(3)=c k(4)=d k(5)=e Fori=1To4 Forj=i+1To5 Ifk(i) t=k(i) k(i)=k(j) k(j)=t EndIf Nextj Nexti func=k (1)&""&k (2)&""&k(3)&""&k(4)&""&k(5) EndFunction 12. 编程找出四位整数abcd中满足下述关系的数有多少种方案。 (ab+cd)(ab+cd)=abcd 13. 求100~999中的水仙花数的个数。 若三位数abc,abc=a*a*a+b*b*b+c*c*c,则称abc为水仙花数。 例如: 1*1*1+5*5*5+3*3*3=153,则153是水仙花数 DimpAsBoolean,sAsInteger,iAsInteger,kAsInteger s=1 Fori=3TonStep2 p=True Fork=2Toi/2 IfiModk=0Thenp=False Nextk IfpThens=s+1 Nexti func=s 14.某同学想将手中一张面值100元的人民币换成5元、1元、0.5元面值的票子,但要求换成以上面值的零钱共100张,要求每种面值不少于1张,问共有多少种方案。 DimaAsInteger,bAsInteger,cAsInteger,sAsInteger s=0 Fora=1To20 Forb=1To100 Forc=1To600 Ifa+b+c=100Anda*5+b*1+c/6=100Thens=s+1 Nextc Nextb Nexta func=s EndFunction 15. 某学校组织一次读书活动,计划购买各种各样书写笔作为奖品。 用100元买100支笔,其中钢笔每支5元,圆珠笔每支1元,铅笔1元买6支,编程求总共有多少种方案 DimsAsLong,mAsInteger s=0 m=1 DoUntils>=12345678 s=s+m m=m+1 Loop func=m-1 EndFunction Functionfunc() DimaAsInteger,bAsInteger,cAsInteger,sAsInteger s=0 Fora=1To20 Forb=1To100 Forc=1To600 Ifa+b+c=100Anda*5+b*1+c/6=100Thens=s+1 Nextc Nextb Nexta func=s 16.打开C: \MyExam\工程1.vbp 按下列要求设计Visual Basic应用程序界面 1.将窗体标题设为“调查表”; 2.在标题为“姓名”的标签右侧画一个名称为Text1的文本框,宽度为2295,并清空其中的内容; 3.在窗体中画一名称为Label2的标签,设标题为“请选择你的爱好”,字体为宋体、四号; 4.在窗体上画三个名称分别为Check1、Check2、Check3的复选框,标题分别为“体育”、“艺术”、“其它”,并选中“艺术”; 5.在窗体下方画一个名称为Command1命令按扭,标题为“确定”; 6.保存结果。 17.打开C: \MyExam\工程1.vbp 按下列要求设计Visual Basic应用程序界面 1.将名称为Form1的窗体宽度设为6500,高度设为4050,背景色为&H0080C0FF&。 2.在窗体上画一个标签Label1,标题为“VB学习园地”,字体为楷体、二号,标签能自动调整大小来显示内容。 且与窗体左边距2040,上边距720。 3.在窗体中画一个命令按钮,标题为“开始”,字体为黑体,小四号。 4.保存结果。 18.打开C: \MyExam\工程1.vbp 按下列要求设计Visual Basic应用程序界面 1.将窗体标题设为“课程选择”; 2.在窗体上画一个名称为Label1标签,标题为“学号”,字体为宋体、小二号; 3.在“学号”右侧画一个名称为Text1的文本框,宽为2300,高为555; 4.画三个名称分别为Check1、Check2、Check3的复选框,标题分别为“多媒体技术”、“算法与程序设计”、“计算机网络应用”,并选择“多媒体技术”; 5.在窗体下方画一个名称为Command1命令按扭,标题为“确定”; 6.保存结果。 19.打开C: \MyExam\工程1.vbp按下列要求设计VisualBasic应用程序界面(图示见操作要求之后) 1.设窗体Form1的标题的“信息输入”; 2.画一名称为Text1的文本框,清空其中内容,文本框宽度为1800,与窗体的上边距为840; 3.将Label2标签的标题“性别”两字设为蓝色(&H00FF0000&),在该标签右侧画两个单选按钮Option1、Option2,标题分别为“男”、“女”,默认为选中“女”; 4..在窗体下方画一个名称为Command1命令按扭,标题为“报名”,字体为楷体、三号; 5.保存文件。 20.打开C: \MyExam\工程1.vbp 按下列要求设计Visual Basic应用程序界面 1.将窗体标题设为“登录”,窗体名称设为“Ct1”,背景色为&H00C0E0FF&; 2.画一名称为Text1的文本框,清空其中内容,宽度为2535,与窗体左边距2600,上边距1560; 3.插入一个名称为Command1命令按扭,标题为“开始考试”,字体为仿宋体、三号,高度为515; 4.保存结果。 21.打开C: \MyExam\工程1.vbp 按下列要求设计Visual Basic应用程序界面 1. 1.将窗体标题设为“编程世界”,将窗体宽度设为6200,高度设为4050; 2.在窗体上画一个标签Label1,标题为“欢迎来到VB编程世界! ”,字体为楷体、二号,字体颜色为&H00008000&,标签能自动调整大小来显示内容; 3.插入一个命令按扭,标题为“单击进入”、字体为黑体、小三号,按钮宽度2000; 4.保存结果。 22.打开C: \MyExam\工程1.vbp 按下列要求设计Visual Basic应用程序界面 1.将窗体名称命名为F1,将窗体宽度设为6000,高度设为4005,背景色为&H0080FFFF& 2.在窗体上画一个标签,标题为“欢迎光临”,字体为黑体、二号,字体颜色为&H000000FF& 3.标签能自动调整大小来显示内容,且与窗体左边距2100,上边距820 4.保存结果 23.打开工程1.vbp按下列要求设计VisualBasic应用程序界面: 1.设窗体Form1的名称改为“Ct1”; 2.在Ct1窗体上画两个标签Label1、Label2,标题分别为“姓名”、“简历”,字体为楷体三号字; 3.在“姓名”右侧画一文本框Text1,清空内容; 4.在“简历”右侧画一文本框Text2,高为1500,宽为4335,设为多行文本输入,并有垂直滚动条; 5.保存文件。 24.打开C: \MyExam\工程1.vbp按下列要求设计VisualBasic应用程序界面(图示见操作要求之后) 1.设窗体Form1的标题的“报名表”。 2.在Form1窗体上画两个标签Label1、Label2,标题分别为“姓名”、“性别”,字体都设为宋体三号。 3.在“姓名”右侧画一文本框Text1,宽为2000,高为650。 4.在“性别”右侧画两个单选按钮Option1、Option2,标题分别为“男”、“女”,默认为选中男性。 5.保存文件。 25.打开c: \MyExam\文档.doc,进行如下操作: 1.将所有的“客户”替换为“用户”; 2.将“动员口令1……”、“动员口令2……”段落悬挂缩进2厘米,并设为黑体、加粗、四号字; 3.将其余段落左缩进2厘米; 4.保存文件。 文档: 动员口令1: 凡是在8月26日至9月10日加入全球通的客户,人人都可获得超值红礼一份! 具体如下: 限于在规定的16日期限内加入全球通的客户 礼包为金额不同的150元、100元、50元购物券 请客户于9月20号之前,持身份证对奖 动员口令2: 拨打1860热线,电话购卡配送上门! 服务内容: 全球通、神州行储值卡、充值卡 目前配送范围: 师范街以北,胜利街以南,建设路以西及和平路以东 图: 26.打开c: \MyExam\表格.xls,进行如下操作: 1.标题单元格合并,设为隶书、蓝色、22号, 表头各项水平居中; 2.将“出生日期”列的日期格式改为日期类型中的“2001-3-14”类型; 3.用函数计算所有学生的总分; 4.保存文件。 高一2009-2010学年第二学期成绩表 班级 姓名 出生日期 语文 数学 计算机 总分 0901 王扬 03/09/83 96 94 60 0902 李东方 05/09/85 78 98 67 0901 张茵 09/05/85 93 87 76 0903 武向清 10/12/84 87 66 68 0902 流水龙 04/09/83 79 88 55 0903 马少林 08/09/84 82 74 74 0903 秦倩 03/08/82 76 80 93 0901 闵捷 09/08/84 67 71 76 0902 郑燕枫 08/12/83 51 65 66 27、打开c: \MyExam\文档.doc,进行如下操作: 1.设置文本样式: 宋体、四号、行距为固定值20磅; 2.每段落首行缩进2个字符; 3.第一段首字下沉2行; 4.插入艺术字“城市,让生活更美好”,作为标题,置于文本的上面。 艺术字形状为“双波型”; 5.设置艺术字格式,文字环绕方式为“四周型”、大小: 高1.7厘米、宽9.2厘米。 位置: 绝对位置,页面,右侧6.3厘米,下侧5.5厘米。 28、打开c: \MyExam\文档.doc,进行如下操作: 1.设置文本样式: 隶书、三号、行距为固定值20磅; 2.每段落首行缩进2个字符; 3.插入艺术字“保护环境,拯救家园”,作为标题,置于文本中间。 其中艺术字形状为桥形。 设置文字环绕方式: 四周型,位置; 4.保存文档。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 算法 会考 模拟 操作