logo 测试 试卷

一、、、填空题：

计算机中有个重要的部件叫CPU,它是 、 两个部分硬件的集成。

TURTLETEXT 的简称是 ；SENTENCE 的简称是 。

执行命令REPEAT 5[FD 50 BK 35 ]画出的线段长度为

将日常数学表达式(15+53

)×2÷14改写成LOGO 语言表达式为

将日常记数法表示的数10000000改写成LOGO 语言中科学记数法表示的数为 ；将-4.01E-06改写成日常记数法表示的数为 。

将十进制数32转化成二进制数为（ ）2；将二进制数（111）2转化成十进制数为（ ）10。 15角星有 种画法，当K 取 时，20角星的内角最大。

随机产生五个元音字母(A E I O U)中的任意一个LOGO 表达式为

执行PR 2/6将显示 ；执行PR 537-(INT 537/100)*100将显示

执行PR AND NOT 3>5 (BF [A B])="B 。

执行PR CHAR 90+65-ASCII FIRST "CBA 的结果为 。

执行PR COUNT [28/2+6=20]显示：

执行PR BM "AE [ABE ACE AEE] 显示

执行PR SE WORD "A "B LPUT "A "B 的结果 。

执行PR FPUT FPUT "A [B C][D E]的结果是 。

二、根据不同的执行参数运行过程所得出的结果，将对应的图形序号A 、B 、C 、D 、E 填写在后面的括号内； TO HUA :N :Y :R

DRAW HT REPEAT :N[REPEAT :Y/10[FD :R*0.174 RT 10] LT :Y+360/:N]

END

执行：HUA 4 180 -40 HUA 6 180 40 HUA 4 360 40 HUA 4 90 40 HUA 4 270 40

三、阅读下面程序，填空完成过程，使之画出如图小蘑菇屋

TO X :X :Y :D

REPEAT 2[FD :X RT :D FD :Y RT 180-:D]

END

TO ZFX :X

REPEAT 4[FD :X RT 90]

END

TO YH :D :R

REPEAT :D [RT 2 FD :R*3.14*2/72 RT 3]

END

TO SJX :X

REPEAT 3[FD :X RT 120]

END

TO NIU

YH 72 10

PU SETX XCOR - 5 PD

REPEAT 10 [PU RT 9 FD 15 * 3.14 * 2 / 20 RT 9 PD LT 90 FD 3 BK 3 RT 90]

REPEAT 10 [PU RT 9 FD 15 * 3.14 * 2 / 20 RT 9]

A B C D E

PU SETX XCOR + 5 PD YH 12 10 RT 90 FD 10 BK 10 LT 90

PU YH 60 10 PD

END

TO CDJ

DRAW

RT 60 X 200 300 30 RT 30

X 300 50 90 FD 300 LT 30

X 200 50 120 PU HOME PU SETXY SE XCOR + 10 YCOR - 35 PD X 20 20 90

PU SETXY SE XCOR + 30 -25 PD NIU

PU SETX XCOR + 40 PD NIU

PU SETXY SE XCOR + 40 YCOR - 5 PD

X 20 160 90

PU SETXY SE XCOR + 10 YCOR + 7

PD X 6 140 90

PU HOME SETXY SE XCOR + 20 YCOR - 60 PD

X 10 40 90 PU SETX XCOR + 220 PD X 10 40 90

END

四、读程序，写出或画出下列程序的运行结果

TO A :X

DRAW REPEAT 4[BK :X LT 45 BK :X LT 45]

END

执行：A 20

TO B

REPEAT 3[LT 30 FD 30 REPEAT 3[FD 30 RT 120]LT 90]

END

执行：B

TO C

SETX -50 SETXY [0 50] SETXY [50 0] SETX 0 SETY 50

END

TO D :X

IF :X>10 STOP

TYPE :X-5*INT :X/5

D :X + 1

END

执行：D 6

TO E :X

IF :X>15 STOP

MAKE "X1 :X

MAKE "X :X1*2

(TYPE :X1 [])

E :X

MAKE "X1 :X

MAKE "X :X1*2

(TYPE :X1 [])

END

执行：E 1

TO F :W

IF EMPTY? :W OP []

OP SE ASCII FIRST :W F BF :W

END

执行：F "CHINA

TO G :X

IF :X>9 OP :X*:X

OP :X*:X+G :X+2

END

执行：G 1

TO H :C :M :N

IF :N+:M-1>COUNT :C OP "

IF :N=0 OP "

OP FPUT ITEM :M :C H :C :M+1 :N-1

END

执行：H "ABCDEFGHI 3 4 显示：

五、依照下列题意，填空完成程序，使之成为题解

1. 一球从625米高的楼顶以每秒5米的速度落下，落地后又弹起楼高的1/5；如此反复…试求多长时间后球停止运动？（假设球在空中速度一定，允许误差为1米）

TO QS

MAKE "T 0 MAKE "L 625 MAKE "V 5

WHILE [NOT :L=1][MAKE "T :T+:L/:V MAKE "L :L/5]

PR :T

END

执行：QS 结果:156

2. 下列过程能根据一有规律的数列：1、5、14、30、55……，打印出该数列的前8项的折线图示。

TO ZX :N

REPEAT 30 [FD 10 LT 90 FD 5 BK 5 RT 90] PU HOME PD

RT 90 FD 200 BK 200 LT 90

FOR "A 1 :N [SETXY SE XCOR+20 (Z :A)]

END

TO Z :N

MAKE "S 0

FOR "I 1 :N[MAKE "S1 :I*:I MAKE "S :S+:S1]

OP :S

END

执行：ZX 8 画出如右图所示。

3. 对任意输入字符个数为奇数的字符串能打印出如图：

TO MAIN

(TYPE [请输入字符串] CHAR 32)

MAKE "W RQ MAKE "C COUNT :W;统计字符串个数

IF (REMAINDER :C 2)=0 STOP

MAKE "T (1+:C)/2 ;（求字符串中心位置）

M1 1 1 :T PR [] A42 1 1 PR []

M3 1 1 :T

END

TO M1 :S :Q :K

IF :S<1 STOP ;S控制每行打印字符数递增 Q控制打印到第几行开始递减K控制取字符的顺序REPEAT :T-:S[TYPE CHAR 32]

REPEAT :S*2-1[TYPE ITEM :K :W MAKE "K :K+1]PR "

TEST :Q<:T

IFT [M1 :S+1 :Q+1 :T-:S STOP ]

M1 :S-1 :Q+1 :T+2-:S

END

TO M2 :S :Q

IF :S<1 STOP

REPEAT :T-:S[TYPE CHAR 32]

REPEAT :S*2-1[ TYPE ITEM :Q :W] PR "

IF :Q<:T THEN M2 :S+1 :Q+1 ELSE M2 :S-1 :Q+1

END

TO M3 :S :Q :K

IF :S<1 TOPLEVEL

REPEAT :T-:S[TYPE CHAR 32]

REPEAT :S*2-1[TYPE ITEM :K :W MAKE "K :K-1]PR "

IF :Q<:T M3 :S+1 :Q+1 :T+:S

M3 :S-1 :Q+1 :T-2+:S

END

执行：MAIN 输入：ABCDEFG