2006年顺德区LOGO语言程序设计比赛初赛试卷

一、画图形。

（20分）图一图二1、（10分）写出画图一的命令答案：repeat 8[fd 50 rt 360*3/8 fd 50 lt 360*3/8-360/8]2、（10分）写出画图二的命令答案：repeat 8[repeat 3[fd 50 rt 120]rt 360/8]考查知识：重复命令的掌握。

考察技能：使用重复命令画出重复的规则图形。

评分标准：没有使用重复命令画图形的扣5分，只有使用难搞重复命令画出全部图形的才给10分。

二、（15分）编写一个带三个变量的过程dbx :n :k :bc，使过程能画出一个由n个边长为bc的正k变形旋转而成的图形。

例如，调用一下过程能画出相对应的图形：Dbx 6 6 50 Dbx 5 5 50 Dbx 10 4 50答案：to dbx :n :k :bcrepeat :n[repeat :k[fd :bc rt 360/:k]rt 360/:n]end考查知识：带变量的过程的使用考察技能：能灵活运用带变量的过程画出不同的图形三、（15分）编写一个计算一位小数加减乘除的人机交互过程main，当过程运行时，屏幕上会出现一道一位小数的计算题，在你输入这道题的答案后，屏幕会提示你这道题目你是做对了还是做错了。

参考答案：TO JFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1(PR :A [+] :B [的和是多少?])MAKE "C READIF :C = :A + :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO JIFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1IF :A < :B THEN MAKE "D :A MAKE "A :B MAKE "B :D(PR :A [-] :B [的差是多少?])MAKE "C READIF :C = :A - :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO CFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1(PR :A [×] :B [的积是多少?])MAKE "C READIF :C = :A * :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO CHFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1MAKE "C :A * :B(PR :C [÷] :B [的商是多少?])MAKE "A READIF :C = :A * :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO MAINMAKE "K RANDOM 4IF :K = 1 THEN JFIF :K = 2 THEN JIFIF :K = 3 THEN CFIF :K = 4 THEN CHFMAINEND考查知识：随机数的灵活使用，尾递归的使用考察技能：能灵活运用随机数产生随机小数，能进行数理分析。

一、画图形。

（20分）图一图二1、（10分）写出画图一的命令答案：repeat 8[fd 50 rt 360*3/8 fd 50 lt 360*3/8-360/8]2、（10分）写出画图二的命令答案：repeat 8[repeat 3[fd 50 rt 120]rt 360/8]考查知识：重复命令的掌握。

考察技能：使用重复命令画出重复的规则图形。

评分标准：没有使用重复命令画图形的扣5分，只有使用难搞重复命令画出全部图形的才给10分。

二、（15分）编写一个带三个变量的过程dbx :n :k :bc，使过程能画出一个由n个边长为bc的正k变形旋转而成的图形。

例如，调用一下过程能画出相对应的图形：Dbx 6 6 50Dbx 5 5 50Dbx 10 4 50答案：to dbx :n :k :bcrepeat :n[repeat :k[fd :bc rt 360/:k]rt 360/:n]end考查知识：带变量的过程的使用考察技能：能灵活运用带变量的过程画出不同的图形三、（15分）编写一个计算一位小数加减乘除的人机交互过程main，当过程运行时，屏幕上会出现一道一位小数的计算题，在你输入这道题的答案后，屏幕会提示你这道题目你是做对了还是做错了。

参考答案：TO JFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1(PR :A [+] :B [的和是多少?])MAKE "C READIF :C = :A + :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO JIFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1IF :A < :B THEN MAKE "D :A MAKE "A :B MAKE "B :D(PR :A [-] :B [的差是多少?])MAKE "C READIF :C = :A - :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO CFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1(PR :A [×] :B [的积是多少?])MAKE "C READIF :C = :A * :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO CHFMAKE "A (RANDOM 100) * 0.1MAKE "B (RANDOM 100) * 0.1MAKE "C :A * :B(PR :C [÷] :B [的商是多少?])MAKE "A READIF :C = :A * :B THEN PR [你答对了！] STOPPR [你答错了！] STOPENDTO MAINMAKE "K RANDOM 4IF :K = 1 THEN JFIF :K = 2 THEN JIFIF :K = 3 THEN CFIF :K = 4 THEN CHFMAINEND考查知识：随机数的灵活使用，尾递归的使用考察技能：能灵活运用随机数产生随机小数，能进行数理分析。

06年1月高级语言程序设计考试题目06年1月高级语言程序设计考试题目06年1月高级语言程序设计考试题目一、单项选择题（本大题共20 小题，每小题1 分，共20 分）在每小题列出的四个备选项中只有一个是符合题目要求的，请将其代码填写在题后的括号内。

错选、多选或未选均无分。

1. 可以用作c 程序标识符的一组是（）a.printb.i\amoodb one-halfabc 3paic.pxqd.cppline# powhis.age while2. 以下叙述正确的是（）a. 宏名必须用大写的英文字母表示b. 宏定义不仅是符号替换，也可以赋值c. 宏替换是在程序编译时完成的，不占用程序运行时间d. 引用带参数的宏时，实际参数与宏定义中的形式参数类型应一致3. 设char a= ＇\70 ＇; 则变量a 中（）a. 包含1 个字符b. 包含2 个字符c. 包含3 个字符d. 是非法表示4. 设long i=65539;, 执行语句printf( ＂%d ＂,i) ；后的输出结果是（）a.-3b.3c.65539d. 数据不确定5. 设float c,f;, 将数学表达式c= (f-32) 能正确表示成c 语言赋值表达式的是（）a.c=5*(f-32)/9b.c=5/9(f-32)c.c=5/9*(f-32)d.c=5/(9*(f-32))6. 设int i=10;, 表达式30-i =i =9 的值是（）a.0b.1c.9d.207. 以下不能看作一条c 语句的是（）a.{;}b.a=5,b=5,c=5;c.if(x =0 y=0);d.if(x= =0)a=5;b=10;8. 在函数调用时，以下说法正确的是（）a. 函数调用后必须带回返回值b. 实际参数和形式参数可以同名c. 函数间的数据传递不可以使用全局变量d. 主调函数和被调函数总是在同一个文件里9. 设int x=7;, 执行语句x=x 2; 后，变量x 的值是（）a.1b.3c.14d.2810. 执行语句printf( ＂|%9.4f|\n ＂,12345.67); 后的输出结果是（）a.|2345.6700|b.|12345.6700|c.|12345.670|d.|12345.67|11. 以下说法中正确的是（）a. 字符型变量可以存放字符串b. 递归调用是指函数调用自己c. 所有的外部函数只能在。

10月17日初赛练习卷（一）一、基本命令题1、与HT命令功能相反的命令是。

2、设置屏幕底色的命令是，设置画笔颜色的命令是，设置画笔宽度的命令是。

3、海龟画图的三种模式：SS命令是模式，FS命令是模式，TS命令是模式。

4、能使海龟从任何位置返回母位的命令有、、。

个。

7、INT 91.08的值是，ROUND 109.23的值是，SQRT 16的值是。

8、想要让海龟从[120,60]定位到[139,245]点上，应该输入命令。

9、“REPEAT 重复次数[命令序列]”的功能是按重复执行所规定的的。

10、过程的第一行叫________，它以to开头，后跟过程名（中间用空格间隔）；中间部分称为_______，它由解决一个问题的具体命令组成；最后一行是_______，用end表示过程结束。

一、选择题1、计算机预防病毒感染有效的措施是（）。

A．定期对计算机重新安装系统 B．不要把U盘和有病毒的U盘放在一起C．不准往计算机中拷贝软件 D．给计算机安装防病毒的软件，并常更新2、在计算机内部，数据是以（）形式加工、处理和传送的。

A．二进制码 B．八进制码 C．十进制码 D．十六进制码3、多媒体信息不包括（）。

A．影像、动画 B．文字、图形 C．音频、视频 D．硬盘、网卡4、计算机系统由哪几部分组成（）。

A．主机和外部设备 B．软件系统和硬件系统C．主机和软件系统 D．操作系统和硬件系统5、下列软件属于系统软件的是( ) 。

A．PowerPoint B．Word2000 C．Excel 2000 D．Windows 2000 6、在计算机中，应用最普遍的字符编码是（）。

A．BCD码 B．ASCII码 C．汉字编码 D．补码7、应用软件是指（）。

A．计算机能够使用所有软件 B．计算机使用时应该具备的软件C．能被应用单位共同使用的某种软件 D．专为某一应用目的而编制的某种软件8、当前笔的颜色为红色，笔的宽度为10，要使笔的宽度为5，颜色为白色，用命令（）。

2007年顺德区LOGO语言程序设计比赛复赛试卷
一、（15分）编写一个带参数的过程，并分别调用该过程画出如下图形。

将调用过程
画图形的命令写在相应的划线处。

图1_______________ 图2________________ 图3___________________
二、（15分）人脑会产生脑电波，有时候信号强，有时候信号弱，通过电子扫描仪可
以检测出脑电波。

有一位病人的脑电波图非常混乱，如下图所示。

请你编写一个过程，
模拟出该病人的脑电波图。

三、（15分）鸡、兔同笼,，共有80个头，244只脚，请你编写带参数的过程计算，鸡
和兔各有多少只？
四（15分）、编写一个过程：从键盘上输入一个2位数的数字，电脑反序输出。

例如，
输入37，电脑输出73。

五、（20分）仔细分析这样一列数：1，2，3，5，8，13，21……
1、（15分）编写过程计算：数列中的第N个数是多少？
2、（5分）调用过程计算：数列中第50个数是______，过程调用方法是____________
六、（20分）编写过程计算下面的算式，并写出过程的执行方法：
1+(1+2)+(1+2+3)+(1+2+3+4)+(1+2+3+4+5)+......+(1+2+ (100)。

2012年顺德区小学LOGO 语言程序设计比赛初赛试卷（说明：上机考试，程序调试通过后写在试卷上，可写在背面。

考试时间90分钟）一、填空：(每空3分，共12分)1、小海龟旋转半周是多少度？ 1802、将算式(7483 )×3+(660+5×75)÷3写成LOGO 语言中的表达式。

(3/8-4/7)*3+(660+5*75)/3 3、画一个边长100的9角星：Repeat 9[fd 100 rt 1440/9]4、画一个半径为50的圆:Stampoval 50 50 二、（每个图形12分，共24分）分别写出画下列图形的命令（或过程）。

（1）（2）（1）(stampoval 50 50 "true) setpc 15 (stamprect 100 100 "true)（2）Repeat 7[fd 50 rt 720/7 fd 50lt 360/7]三、（16分）某城市的水费计算方法是：月用水量在30吨以内（含30吨），每吨水收费5元；如果月用水量超过30吨，超过部分每吨收费10元。

请编写一个人机交互过程，从键盘上输入月用水量，电脑就可以显示水费。

如此循环。

to threeprint [月用水量是多少？] make "t readif :t>30 then (print [月用水量为] :t [水费为] 30*5+(:t-30)*10 ) if :t<=30 then (print [月用水量为] :t [水费为] :t*5 ) three end运行：three四、（16分） 红铅笔每支1.9元，蓝铅笔每支1.1元，两种铅笔共买了16支，花了28元。

问红，蓝铅笔各买几支？请编程序计算。

to four :xif :x>15 then stop if :x*1.9+(16-:x)*1.1=28 then (print [红铅笔买] :x [支，蓝铅笔买] 16-:x [支] ) four :x+1 end运行：four 1(注：条件:x>15可以换成:x>20，甚至:x>100) 五、（16分）编写过程画如图所示形状的图形。

1、计算S=1+1/2+1/3+……+1/n。

to sa :npr [计算S=1+1/2+1/3+……+1/n。

]make "a 0make "b :nrepeat :n[make "a 1/:b+:a make "b :b-1](pr [N次一共等于]:a)end运行:sa 102、计算 S=1+2+2*2+2*2*2+……+2*2*2…….*2(10个2)to tw :cpr [计算S=1+2+2*2+2*2*2+……+2*2*2…….*2(10个2)]make "d 0make "e :cif :c=1 then pr [3]stoprepeat :c-1[make "f 2 repeat :e-1[make "f :f*2]make "e :e-1 make "d :d+:f] pr :d+3end运行:tw 103、六角星to m :a :bif :b>3000 then stopfd :a rt :bm :a :b+10end运行: m 10 0m 10 1m 10 2m 10 3m 10 54、编过程，将1,1＋2,1＋2＋3,……1＋2＋3＋……＋n各数用直线高度表示。

to m1 :afd :a bk :a rt 90 fd 8 lt 90endto m :emake "c 0make "d 0repeat :e[make "c :c+1 make "d :d+:c m1 :d pr :d wait 10]end运行: m 105、三角星TO FENG :NFD 20MAKE "A 20REPEAT :N [LT 90 FD :A / 2 RT 120 REPEAT 3 [FD :A RT 120] FD :A LT 30 MAKE "A :A * 1.2]ENDTO FENG1 :M :NREPEAT :M [FENG :N pu SETXY [0 0] pd RT 360 / :M]END运行: feng1 5 46、等式13*□9+7*△3=1148中的“□”和“△”都是介于1～9之间的自然数，“□”和“△”各是什么数字？to mymake "x random(9)make "y random(9)if 13*(:x*10+9)+7*(:y*10+3)=1148 then (pr [□=]:x [△=]:y) stopmyend7、随机产生10道三位数减两位数的减法题或三位数除以两位数除法题，并实现：A．三位数和两位数是随机产生的；B．由用户输入计算值，计算机给出对错信息；C．对一道题加10分，错一道题不改变分数。

2006年百度之星程序设计大赛试题初赛题目2006 年百度之星程序设计大赛初赛题目1饭团的烦恼“午餐饭团“是百度内部参与人数最多的民间组织。

同一个部门的，同一间大学的，同一年出生的，用同一种型号电脑的，员工们总是以各种理由，各种借口组织各种长久的，临时的饭团。

参加饭团，不仅可以以优惠的价格尝到更加丰富的菜式，还可以在吃饭的时候和同事们唠唠嗑，吹吹水，增进感情。

但是，随着百度的员工越来越多，各个饭团的管理随即变得烦杂。

特别是为了照顾员工们越来越挑剔的胃口，饭团的点菜负责人背负的责任越来越大。

现在，这个重担落在百度之星的肩上，因为，你们将要为所有的百度饭团设计一个自动点菜的算法。

饭团点菜的需求如下：1 ．经济是我们要考虑的一个因素，既要充分利用百度员工的午餐补助，又不能铺张浪费。

因此，我们希望最后的人均费用越接近12 元越好。

2 ．菜式丰富是我们要考虑的另一个因素。

为简单起见，我们将各种菜肴的属性归结为荤菜，素菜，辛辣，清淡，并且每个菜只能点一次。

3 ．请紧记，百度饭团在各大餐馆享受8 折优惠。

输入数据描述如下：第一行包含三个整数N ，M ，K （0<N<=16 ，0<M<=N ，0<K<=12 ），分别表示菜单上菜的数目，饭团需要点的菜的数目，就餐的人数。

紧接着N 行，每行的格式如下：菜名（长度不超过20 个字符）价格（原价，整数）是否荤菜（ 1 表示是，0 表示否）是否辛辣（ 1 表示是，0 表示否）例：水煮鱼30 1 1紧接着是 a b c d 四个整数，分别表示需要点的荤菜，素菜，辛辣，清淡菜的数目。

输出数据：对于每一测试数据，输出数据包含M+1 行，前M 行每行包含一个菜名（按菜名在原菜单的顺序排序）。

第M+1 行是人均消费，结果保留两位小数。

说明：1 ．结果菜单的数目应该恰好为M ，荤菜，素菜，辛辣，清淡菜的数目恰好为a ，b ，c ，d 。

在满足这样的前提下，选择人均消费最接近12 元的点菜方案。

2011年顺德区LOGO 语言程序设计比赛复赛试卷
(90分钟，答案写在本卷上,位置不够可写到背面，交答题电子文档和本卷)
一、（10分）编写过程画图1所示的图形
二、（10分）编写带参过程画如图2所示形状的图形。

要求：通过改变过程的参数，横向和纵向的
正八边形的个数可以变化。

图2
运行：two 4 3 10
三、有一块边长为：L 的正方形材料。

如图3.1所示。

1、(15分)编写过程THREE ：m ：n ：L ，将它锯开成大小相同的小块（如图3.2所示）。

其中：
m 表示横向黑色块的个数，：n 表示纵向黑色块的个数，：L 表示正方形材料的边长。

图3.1 图3.2
2、(15分)编写过程MJ ：m ：n ：L ：K ，计算锯开材料损失的面积（中间白色线所代表的面积）。

其中：K 为分割线的宽度。

四、（15分）编写带参数的过程画如图4所示的“塔尖”。

五、（15分）编写过程FIVE :R ，画一个小球沿着正方形墙内的边线绕行的动画。

如图5所示。

其中：R 是小球的半径，正方形的边长是小球半径的10倍。

六、（20分）有种奇妙的三位数称为“水仙花数”，它的各位数的立方之和等于这个数本身。

例如153就是这样一个三位数： 1×1×1+5×5×5+3×3×3=1+125+27=153 请你找出所有的“水仙花数”。

2005年顺德区LOGO语言程序设计比赛初赛试卷一、选择填空：(每题2分，共26分)1、LOGO语言中的命令都是英文单词的缩写，例如FD、BK、LT、RT分别是英文单词__________、________、________、________的缩写，而ClearScreen、PenUp、PenDown的缩写分别是CS 、_____________、_________________。

2、写出下列命令：设置背景的命令_________、设置笔色的命令_____________、填充颜色的命令______________、改变笔的粗细的命令____ ____________。

3、画一个直径为20的圆：______________________________________________4、画一个横向长为80，纵向宽为40的矩形：_____________________ ________5、画一个边长为100的五角星：________________________________________二、画出下列过程所画的图形(画在题目的右边，要求标出图形的边长。

每题5分，共15分)1. TO AREPEAT 4[FD 20 RT 90 FD 20 LT 90 FD 20 BK 20 RT 90]END执行 A2.TO B1REPEAT 2[FD 20 RT 90 FD 60 RT 90]ENDTO BREPEAT 4[B1 RT 90 FD 60]END执行 B3.TO C1 :XREPEAT 4[FD :X RT 90]ENDTO CC1 60 PU FD 40 RT 90FD 20 PD C1 20END执行 C三、根据图形完成下列过程：(每空2分，共16分)1．TO LXREPEAT _____ [ FD 40 RT 60 FD 40 RT _____ ]ENDTO EX1HT LT _____REPEAT _____ [ LX RT _____ ]END2． TO EX2REPEAT __ [REPEAT __ [ FD 80 RT 90 ] RT __ ]END四、根据要求写出程序：（共9分）自然界的花有的是三瓣，有的是四瓣或者更多。