2011长沙市小学生信息学奥赛决赛模拟试题

时间：120分钟

一、             优惠购物（100分 存盘文件名：TA）

阳光小学需要采购一些笔，某商场正在搞优惠活动：每支笔M元，若购买数量超过10支，则打9折，超过50支，打8折，超过100支，打7折，阳光小学需要采购N支笔，请你计算学校应付多少元钱？

输入：N  M（N,M<=1000，且为整数）

输出：应付款（元），保留两位小数。

样例：输入：11  10

      输出：99.00

Program price;

Var

M,n,sum:integer;

Begin

Write(‘please input m and n’);

Readln(m,n);

If n>10 and n<51 then sum:=m*n*0.9;

If n>50 and n<101 then sum:=m*n*0.8;

If n>100 then sum:=m*n*0.7;

Else sum:=m*n;

Writeln(‘price is’,sum);

End.

二、             首尾质数（100分 存盘文件名：TB）

如果一个整数是质数，而且它的首位和末位也都是质数，则称之为“首尾质数”。现在，请你在N个整数中统计出“首尾质数”的总个数。

样例：输入：3

            37  2 4

      输出：2

三、             搬砖游戏（100分 存盘文件名：TC）

阿蒙想玩一种搬砖游戏：砖块垒成M行4列，每块砖有自己的价值。规定：必须先搬掉上面的砖块才能搬下面的，总共只能搬N块砖，获得最大价值的人有奖。

请计算阿蒙能获得的最大价值是多少？

输入：M  N（M<=200，N<=1000）

      下接M行，每行4个整数，表示砖块的价值。（价值<=100）

输出：最大的价值。

样例：输入：2  3

            1  3  2  1

            9  3  2  1

      输出：13

四、             小球分箱（100分 存盘文件名：TD）

有n个相同的小球要分到3个相同箱子中，允许空箱，分法不能重复，如：n=4时，2、1、1和1、2、1这两种分法重复。问：共有多少种分法？

输入：n(n<=10000)

输出：分法总数。

样例：输入：4

      输出：4