2010年湖南长沙市小学生计算机奥林匹克竞赛初赛试题
2006年长沙市小学生计算机奥林匹克竞赛初赛试题及答案

2006年长沙市小学生计算机奥林匹克竞赛初赛试题(语言:TURBO PASCAL 时间:120分钟)参赛证号姓名学校总分一、单项选择题(每小题2分,共40分)1、下列不属于计算机硬件的是( B )A、扫描仪B、操作系统C、CPUD、软盘2、在Windows资源管理器窗口中,如果文件夹没有展开,文件夹图标前会有(A)A、+B、/C、*D、-3、游戏软件属于计算机的( B )A、系统软件B、应用软件C、高级软件D、低级软件4、连接在Internet的任何一台计算机,都有自己的( C )A、网页B、域名C、IP地址D、Email地址5、在计算机存储容量的表示中,6MB相当于( C )A、6000KBB、6144BC、6144KBD、6000B6、一个INTEGER类型的整数在内存中占(C )个字节。
A、1B、4C、2D、67、在Pascal语言环境下,快捷键组合CTRL+F9的功能是(B)A、保存程序B、编译执行C、关闭窗口D、查看结果8、下列数据作为程序中的常量,错误的是( D )A、3.1415926B、MAXINTC、’JSJJS’D、1/29、每一个Pascal程序中必须包含( B )A、变量说明,语句B、语句C、类型定义、变量说明、语句D、常量说明,变量说明,语句10、十进制数与二进制数混合的等式:100+10=1110,其中三个数依次是(A)A、二进制、十进制、二进制B、十进制、二进制、十进制C、二进制、十进制、十进制D、十进制、二进制、二进制11、下列表达式中,错误的是(D)。
A、-9 div (-10)B、ABS(a-2)/5C、’天才’=’99%的汗水’+’1%的灵感’D、a+b>c and b+c>a12、表达式round(5.8) div 3*5 mod 3-ord(trunc(5.8)<6)的值是( A )A、0B、1C、-1D、213、执行X:=random(100)*random(10)-500,X取值的范围是( C )A、-500<=X<=1000B、-500<=X<=500C、-500<=X<=391D、-499<=X<=39114、X为实数,执行X:=-1;writeln(X)之后,屏幕显示( C )A、-1B、1.0000000000E-1C、-1.0000000000E+00D、-1.00000000015、下列能够把整数6转换为字符’6’的表达式是( D )A、CHR(6-ORD(0))B、CHR(6+ORD(0))C、CHR(6)-ORD(’0’)D、CHR(6+ORD(’0’))16、S=’###ABABCDAB###’,X=POS(‘A’,COPY(S,5,9)),则X的值是( B )A、3B、2C、4D、617、在Var下说明数组变量,下列说明正确的是( C )A、a:Array[100..1] of real;B、a:Array[1.5..10.5] of real;C、a:Array[’B’..’a’] of real;D、a:Array[1..SQR(5)] of real;18、x初值为-1,下列语句描述:若ch是大写字母,则x置1,否则x清0.有错的是(B )A、case ch ofB、if ch>’A’then’A’..’Z’:x:=1; if ch<’Z’thenend; x:=1else x:=0;C、x:=ord((ch>=’A’) and (ch<=’Z’));D、if (ch>=’A’) and (ch<=’Z’)Then x:=1 else x:=0;19、执行下列程序段,循环次数是(A );x:=3;y:=5;FOR i:=x TO y DO BEGINx:=1;y:=6;END;A、3次B、7次C、5次D、6次20、X=3.14E4,执行语句STR(X:0:2,S)之后,S的值是( D )A、’3.14’B、’0’C、’3140.00’D、’31400.00’二、问题解答(每小题5分,共10分)1、星光学校来了一位新老师,三个同学猜测新老师教什么科目,步美说:“不是教语文,也不是教数学”;元太说:“不是教数学,一定是教英语”;光彦说:“不是教英语,一定是教数学”。
长沙市小学生计算机奥林匹克竞赛决赛题答案

2001年长沙市计算机奥林匹克竞赛决赛试题(时间:120分钟)一、(40分)键入一个字符串(串长不超过20),输出相应字符组成的等边三角形。
如:输入:“CHINA”输出:程序:program CS200101;vars:string;n,i,j:integer;beginwrite('Input a string:');readln(s);n:=length(s);for i:=1 to n do beginwrite('':40-i);for j:=1 to i do write(s[j],' ');writelnend;readlnend.二、(50分)一光滑墙壁高X尺,有一个小虫从墙底部向上爬,每分钟爬Y尺。
但每爬一分钟后都要休息一分钟,在休息期间又下滑一尺。
编程:输入X和Y,计算该小虫最少几分钟可爬到顶端。
如:输入:X,Y=4,2输出:5程序:program CS200102;var x,y,s,n:integer;beginwrite('X,Y=');readln(x,y);if y>1 then begins:=0;n:=0;repeats:=s+y;n:=n+1;if s<>x then begins:=s-1;n:=n+1;end;until s>=x;writeln(n);end else writeln('Never');readlnend.三、(50分)科学家在热带森林中发现了一种特殊的小动物,取名为“吱吱”。
“吱吱”的生长繁殖过程很有规律,每对小“吱吱”经过X个月就长成一对大“吱吱”,每对大“吱吱”每个月都产下Y对小“吱吱”。
假设开始时有一对小“吱吱”,并且每对“吱吱”都不死,问:过Z个月后,共有多少对“吱吱”?(X≥1,Y≥1,1≤Z≤24)(注:若当前是1月,则“过”2个月,是表示到3月的时候)输入:X,Y,Z的值输出:“吱吱”的总对数如:输入:X,Y,Z=2,2,4输出:11程序:program CS200103;varx,y,z,s,s1,n:longint;{s1为大“吱吱”的个数}s2:array[1..24] of longint;{s2为小“吱吱”的个数,s2[1]代表第一天小“吱吱”的个数,依次类推}begins:=0;s1:=0;s2[1]:=1;write('X,Y,Z=');readln(x,y,z);for n:=x to z+1 do begins2[n]:=s1*y;{计算当天出生的小“吱吱”}s1:=s1+s2[n-x+1];s2[n-x+1]:=0;{计算当天长大的“吱吱”,s2[n-x+1]为X个月前出生的小“吱吱”个数}end;s:=s+s1;{将大“吱吱”数计入总数}for n:=1 to z+1 do s:=s+s2[n];{将小“吱吱”数计入总数}writeln(s);readlnend.四、(60分)如下图所示,键入A,B,C,D,E的值,然后从A出发,顺次经过每个数字分岔路口,选择+、-、*、/四种运算符之一进行运算,达到目的地E时,运算结果恰好等于E,请你将所有符合上述条件的道路全部找出来。
NOIP2010信息学奥赛初赛普及组模拟试题(二)

NOIP2010初赛模拟试题(六)(普及 Pascal语言二小时完成)●●全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效●●一.单项选择题(共20题,每题1.5分,共计30分。
每题有且仅有一个正确答案。
)1、.在所有由两个1和六个0组成的8位二进制整数(补码)中,最小的数是:()A.-127B.-64 C.-128 D.-652、.在一棵二叉树结点的先根序列、中根序列和后根序列中,所有叶子结点的先后顺序()A.都不相同B.完全相同C.先序和中序相同,而与后序不同D.中序和后序相同,而与先序不同3、下面有效的IP地址是:()A.202.280.130.45 B.130.192.33.45C.192.256.130.45 D.280.192.33.4564、一台具有1024*768分辨率、可显示65 536种颜色的显示器,其显示适配器(显示卡)上显示存储器容量的配置为:()A.512K B.1MB C.大于1.6MB,小于2MB D.2MB5、进行二分法查找,则线性表()A.必须顺序方式存储B.必须以链接方式存储,且数据元素已按值排好序C.必须以链接方式存储D.必须以顺序方式存储,且数据元素已按值排好序6、机器语言是用()编写的。
A.二进制码B.ASCII码C.十六进制码D.国标码7、一棵含有101个结点的完全二叉树存储在数组A[1..101]中,对1≤k≤101,若 A[k]是叶子结点,则k的最小值是:()A.51 B.50 C.49 D.488、不同的计算机,其指令系统也不相同,这主要取决于()A. 所用的操作系统B. 系统的总体结构C. 所用的CPUD. 所用的程序设计语言9、计算机主机是由CPU 与()构成的。
A.控制器B。
输入、输出设备C.运算器D.内存储器10、计算机系统总线上传送的信号有()。
A.地址信号与控制信号B.数据信号、控制信号与地址信号C.控制信号与数据信号D.数据信号与地址信号11、计算机的运算速度取决于给定的时间内,它的处理器所能处理的数据量。
深入Noip2010初赛试题和全解

作者:钟野梓序今年Noip2010初赛刚结束,网上便铺天盖地地响起了“今年初赛好容易”“分数线一定很高,怎么办……”之类的声音。
确实,自2008年起,Noip初赛难度确有逐年下降的趋势,然而这并不是出题水平降低的缘故,相反,我认为这是中国计算机协会(下称CCF)对于N oip考核目的的审视和改变所导致的必然结果。
因此,我试图通过深入解析本届Noip初赛试囗题,来探寻这种变化下面深层的规律,从而令信息学竞赛选手能更好地备战往后数届的Noip初赛,让初赛不再成为一个问题。
由于条件所限,本文仅以Pascal语言的提高组试囗题作为对象进行分析,相对于普及组而言提高组试囗题一向具有较高的难度和较好的区分度,作为研究对象是个很好的选择;至于说语言的选择,仅是因为笔者个人选择原因。
一、概况本届题目在设置方面与往年相似,由选择题(普及组仅有单项选择题,提高组则有单项选择题与不定项选择题)、问题求解、阅读程序写结果及完善程序四大部分组成;但值得注意的是,今年提高组试囗题的分值设计与往年出现了较大的不同,除了选择题仍然是30分(15分单项+15分不定项),其余部分分值均发生了变化,其中问题求解由10分上升到15分,阅读程序由32分下降到28分,完善程序由28分下降到27分。
由于是第一年实行这种分值,目前暂时无法定言背后的含义,然而或许CCF在初赛更加重视选手的数学素质,而弱化了对于阅读程序能力的考察。
众所周知,阅读程序的能力并不能非常真实地反映选手的程序能力,并且纵观近几年的阅读程序题已没有了什么新意,这也可看做是一个“求新求变”的信号。
至于试囗题整体难度方面较上年有了明显下降,其中问题求解第一题可以看做是考察选手的语文水平,而阅读程序更是没有了以往的“死算”题(即给定若干常数,在程序中设置一系列运算过程,让选手进行阅读计算类型的题目),完善程序给定的源代码风格良好,第二题竟然还加上了注释,这不能不说就是一种降低难度的举动。
NOIP2010第十六届初赛试题及答案

NOIP2010第十六届初赛试题及答案(普及组Pascal)NOIP2010第十六届初赛试题及答案(普及组Pascal) PDF格式第十六届全国青少年信息学奥林匹克联赛初赛试题(普及组 Pascal 语言两小时完成)●●全部试题答案均要求写在答卷纸上,写在试卷纸上一律无效●●一. 单项选择题(共20题,每题1.5分,共计30分。
每题有且仅有一个正确答案。
)1.2E+03表示()。
A.2.03B.5C.8D.20002.一个字节(byte)由()个二进制位组成。
A.8B.16C.32D.以上都有可能3.以下逻辑表达式的值恒为真的是()。
A.P∨(﹁P∧Q) ∨(﹁P∧﹁Q)B.Q∨(﹁P∧Q) ∨(P∧﹁Q)C. P∨Q∨(P∧﹁Q) ∨(﹁P∧Q)D.P∨﹁Q∨(P∧﹁Q) ∨(﹁P∧﹁Q)4.Linux下可执行文件的默认扩展名为()。
A.exeC.dllD.以是都不是5.如果树根算是第1层,那么一棵n层的二叉树最多有()结点。
A.2n-1B.2nC.2n+1D.2n+16.提出“存储程序”的计算机工作原理的是()。
A.克劳德·香农B.戈登·摩尔C.查尔斯·巴比奇D.冯·诺依曼7.设X、Y、Z分别代表三进制下的一位数字,若等式XY+ZX=XYX在三进制下成立,那么同样在三进制下,等式XY×ZX=()也成立。
A.YXZB.ZXYC.XYZD.XZY9.前缀表达式“+3×2+5 12”的值是()。
A.23B.25C.37D.6510.主存储器的存取速度比中央处理器(CPU)的工作速度慢得多,从而使得后者的效率受到影响。
而根据局部性原理,CPU所访问的存储单元通常都趋于聚集在一个较小的连续区域中。
于是,为了提高系统整体的执行效率,在CPU中引入了()。
A.寄存器B.高速缓存C.闪存D.外存11.一个字长为8位的整数的补码是11111001,则它的原码是()。
小学信息技术奥赛试题

小学生计算机奥林匹克竞赛初赛试题(时间:90分钟)姓名:学校:总分:一、单项选择题(每小题2分,共40分)1、操作系统是对()进行管理的系统软件。
A、软件B、硬件C、应用程序D、计算机资源2、今年义乌市小学生计算机奥赛中使用的计算机语言仍是()。
A、Free PascalB、C++C、Turbo PascalD、Turbo C3、2008年中科院研制成功的“曙光5000”超级计算机,又刷新了我国计算机的最高运算速度,它每秒运算超过了()。
A、100亿次B、1000亿次C、100万亿次D、1000万亿次4、执行b:=10;for i:=0 to b do b:=b+1; 之后,变量i、b的值分别为()。
A、20,20B、10,21C、21,21D、10,205、与二进制数100110101相等的十六进制数是()。
A、135B、465C、9A1D、5316、根据条件判断的结果,来选择程序执行方向的程序结构称为()。
A、顺序结构B、分支结构C、树形结构D、菜单结构7、若Var A:array[0..10]of integer;定义了数组A,则A数组需要的内存空间为()。
A、22ByteB、20KBC、22KBD、20Bit8、中央处理器每执行一个(),就可以完成一次基本运算或判断。
A、语句B、指令C、程序D、软件9、表达式Trunc(sqrt(18236 div 100 mod 100))的值为()。
A、9B、6C、82D、010、内存储器的每一个存储单元,都对应一个唯一的序号,作为它的()。
A、内容B、指令C、程序D、地址11、描述网络数据传输速率的单位是BPS,其含义是()。
A、每秒传输数据多少公里B、每秒传输数据多少万公里C、每秒传输多少二进制位D、每秒传输多少个数据12、10)用画笔(Paintbrush)绘制图形并存储在文件中,该图形文件的文件名缺省的后缀为( )。
A) .jpg B) .bmp C) .gif D).tiff13、下面布尔表达式的值为true 的是()。
2008年长沙市小学生计算机奥林匹克竞赛初赛试题

2008年长沙市小学生计算机奥林匹克竞赛初赛试题(语言:Turbo Pascal 时间:90分钟)参赛证号姓名学校总分一、单项选择题(每小题 2 分,共40分)1、被称为“现代计算机之父”的是()A、图灵B、冯.诺依曼C、比尔.盖茨D、巴贝奇2、计算机在工作时突然停电,则()中的信息全部丢失,来电之后也不能恢复。
A、ROM和RAMB、ROMC、RAMD、硬盘3、扫描仪、绘图仪、触摸屏、音箱当中有()中具有输出功能。
A、1B、2C、3D、44、计算机能为我们做很多工作,下列缩写CAD、CAM、CAI分别对应的是()A、计算机辅助设计/辅助制造/辅助教学B、计算机辅助制造/辅助设计/辅助教学C、计算机辅助教学/辅助设计/辅助制造D、计算机辅助设计/辅助教学/辅助制造5、二进制数00100100与00010100的和是()A、00101000B、00111100C、00110100D、001110006、程序设计的三种基本结构是()A、主程序、函数、过程B、顺序、选择、循环C、程序首部、说明总分、执行部分D、for、while、repeat7、在Windows中,“回收站”是()的一块区域。
A、硬盘B、内存C、软盘D、光盘8、在Turbo Pascal语言环境下,快捷组合键Ctrl+F的功能是()A、下拉File子菜单B、保存程序C、关闭窗口D、新开窗口9、互联网上最常用的浏览器称为()A、wordB、QQC、IE D、TCP/IP10、某计算机的硬盘有100G,等于()字节。
A、100B、100×1000C、100×1024×1024D、100×1024×1024×102411、下列数据类型中不是构造类型的是()A、集合类型B、数组类型C、文件类型D、枚举类型12、Integer类型的数据范围是()A、-32767~32767B、0~32767C、-32768~32767D、0~6553513、下列表达式的值为FALSE的是()A、Odd(True(7.49))B、Round((Abs(-9.5)))<10C、Not(‘9’<’100’)D、Ord(Chr(Pred(8)))>=714、R:=Random(100)+1产生一个随机数R,R的取值范围是()A、0<=R<=100B、0<R<=100C、1<=R<100D、1<=R<=10115、判断变量ch的值是否为小写字母,下列表达式正确的是()A、not(ch<’a’)or(ch>’z’B、’a’<=ch<=’z’C、(ch>=a)and(ch<=z)D、ch>=’a’ and ch<=’z’16、设n是实型变量,下列表达式能使n四舍五入保留两位小的是()A、Round(n*100)/100B、Round(n/100)*100C、Trunc(n*100)/100D、Trunc(n/100)*10017、设a、b、c都是整型变量,由键盘输入如下三行数据1 2 3 回车4 5 6 回车7 8 9 回车下列语句组中不能使a=1、b=7的是()A、Readln(a,b,b,b,b,b,b,c,c);B、Readln(a);Readln;Readln(b);C、Readln(a,c,c,c);Read(b);D、Readln(a,c,c);Readln(b,c,c);18、设有变量说明VAR I,j:integer;x,y:Real;a,b:Boolean;c:Char;下列赋值语句中正确的是()A、i:=i+x;B、b:=Ord(c>’c’);C、a:=i=j;D、i:=x mod y;19、表达式Chr(Ord(‘A’)+4))的值是()A、’D’B、‘E’C、69D、10120、设a[1]=1,a[2]=2,a[3]=3,a[4]=4,a[5]=5,a[6]=6,且i=1,j=2,k=3,m=4下列变量的值等于3的是()A、a[i*j]B、a[a[k-i]+3]C、a[m div j]D、a[a[j+k-2]]二、问题解答(每小题5分,共10分)1、马路上有编号为1~9的9盏路灯,为了节约用电,现要关掉其中的三盏灯,但两端的灯不能关,也不能同时关掉相邻的灯。
信息奥赛初赛2010试卷

NOIP2010提高组初赛(答案+选择题题目+个人分析)一、单项选择题1.与16进制数A1.2等值的10进制数是()A.101.2B.111.4C.161.125D.177.25C A1.2=10*16^1+1*16^0+1*16^(-1) 公式A=10B=11C=12D=13E=14F=15A=10*16^1=160 1=1*16^0=1 0.2=1*16^(-1)=1/8=0.125Y*X^Z+y*x^z+y*x^z+.......... Y题中式子每一位数X进制数Z第几位数例如上式A是第2位数所以2次方必考的进制运算没什么可说的=。
=2.一个字节(byte)由()个二进制组成。
A.8B.16C.32D.以上都有可能A字节8个字16个双字32个常识问题:数据存储是以“字节”(Byte)为单位,数据传输是以“位”(bit)为单位,一个位就代表一个0或1(即二进制),每8个位(bit)组成一个字节(Byte)。
8bit=1Byte3.以下逻辑表达式的值恒为真的是()。
A.P∨(┓P∧Q)∨(┓P∧┓Q)B.Q∨(┓P∧Q)∨(P∧┓Q)C.P∨Q∨(P∧┓Q)∨(┓P∧Q)D.P∨┓Q∨(P∧┓Q)∨(┓P∧┓Q)A不太懂表示方法:"∨"表示"或","∧"表示"与"."┐"表示"非"."= =" 表示"等价".1和0表示"真"和"假"(还有一种表示,"+"表示"或", "·"表示"与")4.Linux下可执行文件的默认扩展名是( )。
A. exe windows执行程序B. Com windows可执行文件C. Dll动态链接库D. 以上都不是DLinux和Windows不同,Linux一般可执行文件都没有扩展名;Linux不根据拓展名判断文件类型而是根据文件内容判断;因此Linux下扩展名的作用只是帮助以识别文件的,对Linux本身并没有什么用=。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
2010年长沙市小学生计算机奥林匹克竞赛初赛试题一、单项选择题(每小题 2 分,共40分)1、2009年国防科技大学研制的中国首台千万亿次超级计算机在长沙问世,其峰值速度达到1206万亿/次,被命名为()。
A、银河一号B、天河一号C、联想2009D、曙光5000A2、有计算机界“诺贝尔奖”之称的是()奖。
A、冯·诺依曼B、奥斯卡C、比尔·盖茨D、图灵3、国标码的“中国”二字在计算机内占()个字节。
A、2B、4C、8D、164、存储容量2GB相当于()A、2000KBB、2000MBC、2048MBD、2048KB5、下列字符串中最小的是()A、‘ABCD’B、‘abcd’C、‘9876’D、‘mini’6、执行 x:=-3.14; writeln(x)之后,屏幕显示()A、-3.14B、-3.1400000000E+00C、3.1400000000E-02D、3.1400000000E+027、执行writeln(odd(ord(round(2010.46))))的结果为()。
A、0B、1C、FALSED、TRUE8、下列四个不同进制的数当中最大的是()。
A、(3732)8B、(2010)10C、(7DA)16D、(1111101 1011)29、下列表达式中可以得到字符‘a’的是()A、chr(ord(‘z’)+7)B、pos(‘a’,’Pascal’)C、copy(‘Pascal’,1,2) D、ord(‘A’)+3210、若A=true、B=false、C=false、D=true,下面布尔表达式值为f alse的是()。
A、(A or B) and not C and DB、A or not(B and C) or DC、A or not B or not C or not DD、not A or B or C and D11、下列定义的数组当中占内存最多的是()A、a:array[1..200] of integer;B、b:array[0..400] of char;B、c:array[1..100] of real; D、d:array[1..400] of Boolean;12、变量名Wrong、End、72CS、A_1、NO、A+B当中正确的有()个。
A、1B、2C、3D、413、下列关于计算机病毒的说法错误的是()A、尽量做到使用正版软件,是预防计算机病毒的有效措施。
B、用强效杀毒软件将U盘杀毒后,U盘就再也不会感染病毒了。
C、未知来源的程序很可能携带有计算机病毒。
D、计算机病毒通常需要一定的条件才能被激活。
14、用插入法将5,3,6,7,2,8,1,4,9从小到大排序:将街待插入的第i个数放在第0位做“哨卡”,从第i-1位起向前查找应插入的位置,则完成排序需比较()次。
A、23B、20C、36D、2515、由A:=random(1)+1;B:=random(1+1)可得到结果()A、A=1,B=1B、A=0,B=1C、A=2,B=0D、A=1,B=216、以下行为正确的是()A、考试时不会做的题去问别人,或者抄看别人的答案。
B、为了学校的团体荣誉,将自己的答案传给同学。
C、做完试题之后不反复仔细检查,考试时间内与别人聊天。
D、积极动脑思考、认真冷静答题,反复仔细检查,直到考试结束。
17、输入一个数(可能是小数),再按原样输出,则程序中处理此数的变量最好使用()A、字符串类型B、整数类型C、实数类型D、数组类型18、在Pascal语言环境下,兼有编译和执行程序两项功能的快捷键组合为()A、ALT+F5B、ALT+F9C、CTRL+F5D、CTRL+F919、下列说法中错误的是()A、中央处理器CPU包括了计算机硬件结构的两个主要部分:运算器和控制器。
B、Pascal是计算机高级语言之一,因此计算机能直接识别其程序的每个语句。
C、连接在Internet的任何一台计算机,都有自己的IP地址。
D、Windows中的“回收站”是计算机硬盘的一块区域。
20、执行i:=1;Repeat c:=a;a:=b;b:=c;i:=i+1 until i=2010之后,a与b( )。
A、交换了值B、维持原值C、同为a值D、同为b值二、问题解答(每小题5分,共10分)1、请观察如下形式的等边三角形:边长为2 边长为4当边长为2时,有4个小三角形。
问:当边长为6时,有________个小三角形。
当边长为n时,有________个小三角形。
2、将一个正整数拆分成若干个整数,使它们的乘积最大。
例如:将8拆分后,乘积最大为18(即:2*3*3)。
问:将15拆分后,乘积最大为_______________。
将28拆分后,乘积最大为_______________。
三、阅读程序,写出程序的结果(每小题5分,共20分)(1)var a,b,n:integer;beginreadln(n);a:=n div 10; b:=n mod 10;if a+b mod 3=0 then writeln(‘Yes!’)else writeln(‘No!’)end.输入:96 输出:(2)var i,len:integer;s1,s2:string;beginreadln(s1);readln(s2);for I:=1 to length(s1) doif (s1[i]=’A’) and (s2[i]<>’T’) then s2[i]:=’T’else if (s1[i]=’T’) and s2[i]<>’A’) then s2[i]: =’A’else if (s1[i]=’C’) and s2[i]<>’G’) then s2[i]: =’G’else if (s1[i]=’G’) and s2[i]<>’C’) then s2[i]: =’C’writeln(s2);end.输入:ACTGGTCATTTCCCGACTAGTTATGC输出:(3)var a,b,c:integer;procedure work(var a,b:integer);var c:integer;beginwhile b>0 do beginwhile a>=b do a:=a-b;c:=a; a:=b; b:=c;end;end;beginreadln(a,b,c);work(a,b);work(a,c);writeln(a);End.输入:40 96 56输出:(4) var i,j,n:integer;ok:array[1..100] of Boolean; beginreadln(n);for i:=2 to n doif not ok[i] then beginj:=i;while i*j<=n do beginok[i*j]:=true;j:=j+1end;end;for i:=2 to n doif not ok[i] thenwhile n mod i=0 do beginwrite(i,‘‘);n:=n div iend;end.输入:28输出:四、完善程序(每空3分,共30分)1、切蛋糕将一块足够大的蛋糕由上向下竖起的切n刀(n<=10),而且切开的蛋糕不允许移动。
问:最多可切成多少块蛋糕?提示:切第Var i,n:integer;f: ;beginreadln(n);f[0]:= ;for i:=1 to dof[i]:= ;Writeln( );end.2、剪绳子:有n根长短不一的绳子,要将它们剪成长度相同的n根绳子,并且使它们尽可能长。
下面的程序彩二分法。
设:ans为所求长度;min、max分别为ans寻求长度区间的左界、右界。
1、将ans定在当前min至max的中间位置。
2、若以ans为长度能够剪出n根绳子,说明ans可能加长,则将min调整为ans,否则说明ans应当减小,将max调整为ans-1.反复做1、2两步,直至min与max重合,此时ans即为所求的最大长度。
Var n,min,max,i,ans,s:integer;a:array[1..100] of integer;beginreadln(n);min:=maxint;max:=1;for i:=1 to n do beginread(a[i]);if a[i]>max then max:=a[i];end;repeatans:= ;s:=0;for i:=1 to n dos:= ; if then min:=anselse max:=ans-1; until ;writeln(min);End。