noip普及组复赛答案Word文件下载.docx
- 文档编号:15339938
- 上传时间:2022-10-29
- 格式:DOCX
- 页数:20
- 大小:23.18KB
noip普及组复赛答案Word文件下载.docx
《noip普及组复赛答案Word文件下载.docx》由会员分享,可在线阅读,更多相关《noip普及组复赛答案Word文件下载.docx(20页珍藏版)》请在冰豆网上搜索。
ifv*tu*(t-k)thenwriteln(-1);
ifv*t=u*(t-k)thenwriteln(0);
end;
end.
1、输入:
2
6262
8682
输出:
2、输入:
3002806020
12001213
3、输入:
3
100205030
100504525
100802717
4、输入:
150772923
127112213
13922137
二、小球路程(文件名:
xqlc.pas)
已知小球从100米高度自由下落,落地后反弹起,又落地,又弹起,?
?
。
每次弹起的高度都是上一次高度的一半。
求小球第n次反弹起的高度和球在整个过程所经过的路程(包括下落和反弹),用键盘输入n,输出反弹高度和经过路程,结果保留两位小数。
输入输出示例:
输入:
25.00
225.00
varn,b:
s,h:
real;
beginreadln(n);
h:
=100;
forb:
s:
=s+h;
=h/2;
writeln(h:
0:
2);
writeln(s:
三、商品编码(文件名:
spbm.pas)
某种商品编码是一个由13位数字组成的可识别的编码。
通过对这些编码数字使
用一种计算方法可以检验输入的数字是否正确。
这种称为13位数字的“1-3和”的计算方法是,从第一位开始乘1,每个数字交替乘以1和3,然后算出相加的和。
例如,9780921418948的“1-3和”的计算如下:
9*1+7*3+8*1+0*3+9*1+2*3+1*1+4*3+1*1+8*3+9*1+4*3+8*1=120
要求输入商品编码,计算对应的“1-3和”。
样例输入:
9780921418948
120
c:
char;
s,i,n,m:
=0;
=1to13dobegin
read(c);
ifimod2=1thenm:
=1elsem:
=3
=s+m*(ord(c)-48);
0ascii码48
writeln(s);
输入1234567890123输出95输入1230145678922输出94
输入3309890786442输出139输入9978564578341输出156
四、寻找x的幂(文件名xzxdm.pas)
数学上把x的k次方叫x的k次幂,如4的3次幂为4自乘3次。
给定一个整数n,请输出距离它最近的那个x的幂是多少。
如果有两个距离相同,输出那个小的。
输入整数x(2≤x≤5)和n(10≤n≤20000),输出一个整数,表示距离最近的那个x的幂。
217样例输出:
16
n,x,tp,tp1:
readln(x,n);
tp:
=x;
repeat
=tp*x;
幂
untiltpn;
tp1:
=tpdivx;
iftp-n=n-tp1thenwriteln(tp1)
elsewriteln(tp);
380
81
5625
625
412288
16384
25768
4096
五、表达式计算(文件名bds.pas)
输入一个正整数n(1≤n≤500),求s=1+2-3+4+5-6+7+8-9+?
+n,并统计其中共有多少个减号。
输入只有1行,一个正整数n。
输出文件也只有一行,二个整数,中间用空格隔开,分别表示s的值和减号的个数。
样例:
15
305
i,s,k,n:
longint;
=0;
k:
=1tondo
ifimod3=0thenbegin
=k+1;
=s-i;
end
elses:
=s+i;
writeln(s,,k);
输入45输出31515输入500输出42084166
输入200输出683466输入139输出324446
六、有趣的质数(文件名:
yqdzs.pas)
小明发现了一个有趣的现象,有些数字(例如:
2333)本身是个质数,将末尾数去掉后发现它仍然是质数,依此类推,一直到第一位仍是质数(含1)。
现在给定m和n的值(mn≤30000),求在这个范围内有多少个这种数字。
输入:
50100
5
说明:
五个符合的质数是53、59、71、73、79。
n,m,i,a,j,t:
f:
boolean;
read(n,m);
=ntomdobegin
a:
=i;
f:
=true;
forj:
=2totrunc(sqrt(a))do
ifamodj=0thenf:
=false;
=adiv10;
until(a=0)or(f=false);
ifftheninc(t);
writeln(t);
输入525
7
输入501500
32
输入900011000输出0
输入2900029500输出1
七、素数算式(文件名:
ssss.passsss.bas
在下面的算式中每个“#”都表示一个素数数字。
##
*#
ssss.lgo)
【篇二:
noip普及组复赛模拟试题23(答案)】
lass=txt>
给出用等号连接的两个整数,如“1234=127”。
当然,现在这个等号是不成立的。
题目让你在左边的整数中间某个位置插入一个加号,看有没有可能让等号成立。
以上面的式子为例,如果写成123+4=127,这就可以了。
请你编写一个程序来解决它。
input只有那个不相等的式子。
已知,等号两边的整数都不会超过
200000000000。
output如果存在这样的方案,请输出那个正确的式子。
如果不存在解决方案,请输出“impossible!
”(引号中的部分)。
sampleinput1234=127
sampleoutput123+4=127
programex1075;
vari,len,p:
a1,a2,b:
st,st1,st2,st3:
string;
readln(st);
p:
=pos(=,st);
st1:
=copy(st,1,p-1);
delete(st,1,p);
val(st,b,x);
len:
=length(st1);
=1tolen-1do
st2:
=copy(st1,1,i);
val(st2,a1);
st3:
=copy(st1,i+1,len-i);
val(st3,a2);
ifa1+a2=bthenbeginwriteln(a1,+,a2,=,b);
exit;
writeln(impossible!
)
输入45789=5793
输出4+5789=5793
输入34345678932=343456821
输出343456789+32=343456821
输入123456789=12345
输出impossible!
1985764235=1985999
输出1985764+235=1985999
给若干个字符串,判断该字符串最多重复了几次,比如,给ababab,结果是3,因为ab重复了3次,因为求最多重复了几次,所以结果不是1,在比如abcdabcd结果是2,abcd结果是1.输入一组字符串,以“。
”作为结束标志。
样例输入1
aaaaabcd
。
样例输出4
array[0..1000000]oflongint;
ansistring;
procedurework;
i,j:
fillchar(p,sizeof(p),0);
j:
fori:
=2tolength(s)do{自己和自己匹配}begin
while(j0)and(s[j+1]s[i])doj:
=p[j];
ifs[j+1]=s[i]theninc(j);
p[i]:
=j;
if(length(s)
mod(length(s)-p[length(s)])=0)and(length(s)(length(s)-p[length(s)]))thenwriteln(length(s)div(length(s)-p[length(s)])){p数组的应用使得求解方便得很。
}elsewriteln
(1);
readln(s);
whiles.dobeginwork;
输入
xyzxyz
teateate
catcatcat
.
输出2
输入yyyyu
yyyyyyy
teletele
输出
【题目描述】蚊子最近经常做噩梦,然后就会被吓醒。
这可不好。
疯子一直在发愁,然后突然有一天,他发现蚊子其实就是害怕
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- noip 普及 复赛 答案