《宁波市第25届小学生程序设计竞赛及答案》由会员分享，可在线阅读，更多相关《宁波市第25届小学生程序设计竞赛及答案（14页珍藏版）》请在金锄头文库上搜索。
1、宁波市第宁波市第 25 届中小学生程序设计竞赛届中小学生程序设计竞赛 小学组初赛试题小学组初赛试题 一、选择题（每题 2 分,共 30 分。每小题只有唯一一个正确答案） 1、在宁波市中小学生程序设计比赛复赛（上机编程）时，以下不能使用的编程语言是： （A）Turbo Pascal（B）Free Pascal（C）C（D）C+ 2、在 Free Pascal 中按功能键 F7 或 F4 时，以下叙述正确的是： （A）F4 逐条语句执行（包括子程序），F7 运行至光标位置 （B）F7 逐条语句执行（包括子程序），F4 运行至光标位置 （C）F4 逐条语句执行（不包括子程序），F7 运行至光标位置
2、（D）F7 逐条语句执行（不包括子程序），F4 运行至光标位置 3、使用高级语言编写的程序称之为： （A）源程序（B）编辑程序（C）编译程序（D）链接程序 4、如果自己的程序进入了死循环，应当按什么键终止？ （A）Ctrl+C（B）Ctrl+D（C）Alt+C（D）Alt+D 5、参加宁波市中小学生程序设计比赛复赛（上机编程）时，以下哪种行为是允许的？ （A）访问互联网或局域网（B）使用 U 盘或光盘 （C）使用自带的草稿纸（D）考试时发现机器有问题，举手示意监考人员来处理 6、参加宁波市中小学生程序设计比赛复赛（上机编程）时，你有一个程序被判 0 分。 你发现程序其实是正确的，但存在以下问题
3、，提出申诉，以下哪个申诉会被接受？ （A）源程序文件名和存放源程序的目录名错误 （B）只是存放源程序的目录名错误，源程序文件名是正确的 （C）存放源程序的目录名正确，源程序文件名是错误的 （D）根据比赛规则，以上申斥都不会被接受 7、在 Free Pascal 语言，以下关于各种数据类型占内存空间大小的描述错误的是： （A）每个 integer 型占 2 个字节（B）每个 longint 型占 4 个字节 （C）每个 boolean 型占 2 个字节（D）每个 extended 型占 10 个字节 8、关键码相同的二个元素，原来在排在前面的还能保证排在前面,这种排序算法我们 称它是稳定的。冒泡
4、排序、选择排序、插入排序中,一般意义上是稳定的有几种： （A）1（B）2（C）3（D）0 9、在 Free Pascal 中编辑当前源程序时，可以使用快捷键 Ctrl+F7 增加调试程序时监 视的变量，但如果不小心错按为 Ctrl+F6 时，会将当前源程序窗口隐藏起来。此时，可以使 用菜单命令“Windows/List”调出 Windows List 对话框， 在该对话框中选中隐藏的当前正在编 辑的源程序，然后按下面哪个命令按钮可以显示当前正在编辑的源程序？ （A）Ok（B）Not Hide（C）Show（D）Delete 10、结构化程序设计的三种基本控制结构为顺序结构、选择结构和循环结构，
5、以下说 法正确的是： （A）三种结构都是基本结构，内部不能再有其它结构 （B）三种结构都是基本结构，内部除了允许嵌套同一种结构外，不能再有其它结构 （C）选择结构和循环结构内部可以嵌套有其它结构，顺序结构不可以嵌套其它结构 （D）三种结构内部都可以嵌套其它结构 11、以下属于计算机的基本指令的是： （A）数值和逻辑运算指令 （B）存储和输入输出指令（C）控制和转移指令（D） 以上都是 12、以下属于汉字输出时使用的编码的是： （A）国标码（B）区位码（C）字形码（D）五笔字形 13、以下存储介质中，一般说来存取速度最快的是： （A）硬盘（B）内存（C）U 盘（D）光盘 14、以下主要用来网页制
6、作的是： （A）BASIC（B）Pascal （C）FrontPage （D）HTML 15、标准 ASCII 码最多能表示的字符个数是： （A）128（B）64 （C）256 （D）8 二问题求解（每题 5 分，共 10 分） 1、一副扑克牌除去大小王外，有 52 张牌。其中有黑桃（Spade）、红心（Heart）、 方块(Diamond)、梅花(Club)四种花色，每种花色点数从小到大各有 13 张，它们是：2、3、 4、5、6、7、8、9、10、J、Q、K、A。 在上述 52 张中任取 5 张，取得炸弹（four of a kind,即四张点数相同的牌加一张另 外点数的牌）的取法数有 1
7、3*48=624 种；取得辅鲁(full house,即三张点数相同另加二张点 数相同牌)的取法数有多少种？请注意，二种取法中，只要有一张牌花色不同或点数不同， 这二种取法就是不同的。 2、有若干堆硬币，甲乙二人参加游戏，游戏规则如下： （1）由甲开始，二人轮流取硬币，每次取时只能从某一堆中取若干个硬币，可以把 该堆硬币全部取完，最少可以只取一个硬币，但不能不取硬币。 （2）最后取完最后一个硬币的人为胜者。 比如一开始有二堆硬币，第一堆 1 枚，第二堆 2 枚，有几种取法： （1）甲取第一堆 1 枚，乙取第二堆 1 枚，甲取第二堆 1 枚，甲获胜！ （2）甲取第一堆 1 枚，乙取第二堆 2 枚
8、，乙获胜！ （3）甲取第二堆 1 枚，乙取第一堆 1 枚，甲取第二堆 1 枚，甲获胜！ （4）甲取第二堆 1 枚，乙取第二堆 1 枚，甲取第一堆 1 枚，甲获胜！ （5）甲取第二堆 2 枚，乙取第一堆 1 枚，乙获胜！ 显然，当甲先取第二堆 1 枚时，甲能获胜！当甲采取其它取法时，当乙取对时，甲会 失败的。但如果一开始二堆硬币数都为 2 枚，则甲无论在哪一堆中取多少个，乙可以在另 外一堆中取同样多个，乙获胜，甲失败。 现在有三堆硬币，第 1 堆有 2 枚硬币，第 2 堆有 4 枚硬币，第 3 堆有 5 枚硬币。问甲 先取，在大家都使用最佳方法的情况下，甲能否获胜？如果甲能获胜，请写出第一次在第
9、几 堆取多少枚硬币才能获胜？如果不能获胜，则只要写上“No”。 三阅读程序，求程序运行输出结果(每题 8 分，共 32 分) 第 1 题： program xx2010_1; var i,j,s:longint;prime:boolean; begin for i:=2 to 20 do begin prime:=true; for j:=2 to i-1 do if i mod j=0 then begin prime:=false; break; end; if prime then s:=s+1; end; writeln(s); end. 【输出】：_ 第 2 题： Program x
10、x2010_2; var a,b,c,d,n,i,j:longint;find:boolean; f:array09of longint; begin f0:=2;f1:=3;f2:=5;f3:=7;f4:=11; f5:=13;f6:=17;f7:=19;f8:=23;f9:=29; readln(a,b,c,d); n:=10; a:=(fa*fb-fc*fd) mod n+n) mod n; b:=(fb* fc-fd* fa) mod n+n) mod n; c:=(fc* fd-fa* fb) mod n+n) mod n; d:=(fd* fa-fb* fc) mod n+n) m
11、od n; writeln(a, ,b, ,c, ,d); end. 【输入】：2 3 5 7 【输出】：_ 第 3 题： Program xx2010_3; var a:array130of longint; s,n,i,x,y,z:longint;c:char; begin readln(x,y); readln(z); n:=0; while z0 do begin n:=n+1;an:=z mod 10;z:=z div 10; end; s:=0; for i:=n downto 1 do s:=s*x+ai; writeln(s); n:=0; while s0 do begin
12、n:=n+1;an:=s mod y;s:=s div y; end; for i:=n downto 1 do write(ai); writeln; end. 【输入】： 7 2 126 【输出】： _ _ 第 4 题： Program xx2010_4; var f:array146of longint; a:array1100of longint; x,y,z,i,j,n,count:longint; function find(i,h,x:longint):longint; var m:longint; begin if i=0)and(si0 then begin /前面已经得到正
13、整数值，当前数字 x 进入数字栈 tn:=tn+1;numtn:=x; x:=0;end; if si=( then begin /第 i 个字符为左括号,入符号栈 tc:=tc+1;codetc:=si;end else if si=) then begin /第 i 个字符为右括号 while do begin tn:=tn-1; numtn:= ; tc:=tc-1; end; ; end else begin /第 i 个字符为+,-,* while prio(codetc,si) do begin tn:=tn-1; numtn:= ; tc:=tc-1; end; tc:=tc+1
14、; ; end; end; end; writeln( ); end. 小小 学学 组组 初初 赛赛 答答 案案 一、单项选择题（每题 1.5 分，共计 30 分） 12345678910 ABAADDCBA 或 C D 1112131415 DCBCA 二、问题求解（共 2 题，每题 5 分，共 10 分） 1、13*6*12*4=37442、第 1 堆取 1 枚 三、阅读程序，求程序运行输出结果（共 4 题，每题 8 分，共 32 分） 1、8_ 2、8 4 4 6 3、69_ 4、5 2 _ 1000101_0 4_ 四、程序填空（前 5 空，每空 2 分，后 6 空每空 3 分，共 28 分） n:=1_ (i( 前后可以有括号 cal(numtn,numtn+1,codetc)tc:=tc-1 或 dec(tc)或 dec(tc,1) codetc:=si_ num1:0:0_
