- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
第十一届全国青少年信息学奥赛2005年普及组初赛(pascal)解题报告(阅读程序、完善程序)阅读程序第一题var
a,b:integer;
begin
read(a);
b:=(a*(a*a))+1;
ifbmod3=0thenb:=bdiv3;
ifbmod5=0thenb:=bdiv5;
ifbmod7=0thenb:=bdiv7;
ifbmod9=0thenb:=bdiv9;
ifbmod11=0thenb:=bdiv11;
ifbmod13=0thenb:=bdiv13;
ifbmod15=0thenb:=bdiv15;
writeln((100*a-b)div2);
end.
输入:10
输出:
阅读程序第二题var
str:string;
i:integer;
begin
str:=Today-is-terrible!;
fori:=7to11do
ifstr[i]=-thenstr[i-1]:=x;
fori:=13downto1do
ifstr[i]=tthenstr[i+1]:=e;
writeln(str);
end.
输出:
阅读程序第三题
var
a,b,c,p,q:integer;
r:array[0..2]ofinteger;
begin
read(a,b,c);
p:=adivbdivc;
q:=b-c+a+p;
r[0]:=a*pdivq*q;
r[1]:=r[0]*(r[0]-300);
if(3*q-pmod3=r[0])and(r[2]=r[2])then
r[1]:=r[r[0]divpmod2]
elser[1]:=qmodp;
writeln(r[0]-r[1]);
end.
输入:10073
输出:
阅读程序第四题var
str:string;
len,i,j:integer;
nchr:array[0..25]ofinteger;
mmin:char;
begin
mmin:=z;
readln(str);len:=length(str);
i:=len;
whilei=2dobegin
ifstr[i-1]str[i]thenbreak;dec(i);
end;
ifi=1thenbegin
writeln(Noresult!);exit;
end;
forj:=1toi-2dowrite(str[j]);
fillchar(nchr,sizeof(nchr),0);
forj:=itolendobegin
if(str[j]str[i-1])and(str[j]mmin)then
mmin:=str[j];
inc(nchr[ord(str[j])-ord(a)]);
end;
dec(nchr[ord(mmin)-ord(a)]);
inc(nchr[ord(str[i-1])-ord(a)]);
write(mmin);
fori:=0to25do
forj:=1tonchr[i]do
write(chr(i+ord(a)));
writeln;
end.
输入:zzyzcccbbbaaa
输出:
完善程序第一题1.判断质数
题目描述:
给出一个正整数,判断这个数是否是质数。
输入:
一个正整数n(1≤n≤10000)。
输出:
如果n是质数,输出YES;否则,输出NO。
输入样例:
10
输出样例:
NO
2.木材加工
题目描述:
木材厂有一些原木,现在想把这些木头切割成一些长度相同的小段木头(木头有可能有
剩余),需要得到的小段的数目是给定的。当然,我们希望得到的小段越长越好,你的任务是计算能够得到的小段木头的最大长度。木头长度的单位是cm。原木的长度都是正整数,我们要求切割得到的小段木头的长度也是正整数。
输入:
第一行是两个正整数N和K(1≤N≤10000,1≤K≤10000),N是原木的数目,K是需要得到的小段的数目。
接下来的N行,每行有一个1到10000之间的正整数,表示一根原木的长度。
输出:
输出能
您可能关注的文档
- 三年级+四则混合运算+张锟.ppt
- 物流设施与设备.ppt
- 张沂《我是小音乐家》.ppt
- 我是小音乐家.ppt
- 哥伦比亚风光.ppt
- 动词时态语态.ppt
- 动词的时态和语态.ppt
- 企业的经营和管理.ppt
- 2.1.4多项式的乘法-2.ppt
- 12.2.3多项式与多项式相乘.ppt
- 2020-2021学年浙江省杭州市拱墅区八年级(下)期末数学试卷公开课教案教学设计课件资料.doc
- 9月30日的作业错题公开课教案教学设计课件资料.docx
- 2022届高考语文阅读系列——铁凝作品选公开课教案教学设计课件资料.docx
- 数据加密与安全公开课教案教学设计课件资料.pptx
- 地貌类型——海岸地貌公开课教案教学设计课件资料.pptx
- 7.2 全面推进依法治国的总目标与原则公开课教案教学设计课件资料.pptx
- 大单元三 天气与气候公开课教案教学设计课件资料.docx
- 10 彩虹公开课教案教学设计课件资料.pptx
- 06-第六单元 遗传的分子基础公开课教案教学设计课件资料.docx
- 2023-2024高二上期中模拟答案一公开课教案教学设计课件资料.docx
文档评论(0)