L o g o的计算功能.docVIP

——L o g o的计算功能 爸爸妈妈总是给我布置一大堆的计算题，说是要我养成专心致志的好习惯。这不，又让我计算这么多不同半径的圆的周长，不把我算傻了才怪呢。要是算错了，连晚上的动画片都看不成了，真惨!还是请小海龟来帮帮忙吧，爸爸妈妈只知道它会画画，也许不了解它还会做计算呢。 直接输入算式 小海龟可是一位神算手，同学们只要告诉它算式，就能立刻从它那里得到计算结果。例如，要计算半径为50的圆的周长，我们只需在命令窗口中输入圆周长计算公式2*PI*50，并按回车键，小海龟立刻给出计算结果——3 1 4．1 6， 见图1 2．1。 图1 2．1 输入算式得到计算结果 小括号，例如，算式[(5 5—5)×5+(63—8)÷1 1]÷5，在Logo语言中应写成((5 5—5)*5+(63—8)／1 1)／5，小海龟将从最里层的括号算起。 编写计算过程 反复输入算式太麻烦，还是编个计算圆周长的过程吧，不过这就要在算式前加上PR命令了。 TO ZC：R PR 2*PI*R END 格式1：PR输出内容或算式 格式2：(PR输出内容或算式1 u输出内容或算式2……) 功能：在命令窗口内显示打印输出内容或算式的值。 如果PR命令中的输出内容是汉字、英文字母或其他符号，则必须在前面加上引号或用方括号括起来，例如，要输出“圆的周长是：这句话的命令是： PR圆的周长是： 如果输出内容或算式有多个，则要用空格分隔开，并在整条命令外添加小括号。 用一个过程计算任意半径的圆的周长 每计算一个圆的周长就要执行一次过程，还是不方便，能不能只执行一次过程就把任意多个半径不同的圆的周长都计算出来?当然可以，而且聪明的同学应该已经想到递归调用了，不过还得先学习两条新命令。 (1)赋值命令 格式：Make变量名表达式 功能：计算出表达式的值，并把它存放在指定的变量中。 调用带变量的过程时，我们用在过程名的后面给出变量值的方式给变量赋予具体数值，这里则是用：Make命令直接给变量赋值。例如： TO FZ MakeB L 1 O PR：BI END 执行FZ过程，在命令窗口显示1 0。请同学们注意是赋值号，BL是变量名，:BI是变量，不要搞混淆了。 (2)键盘读取命令 格式：Read 功能：读取从键盘输入的数据。 例如，MakeⅣR Read命令的作用是把从键盘输人的数据存放在变量：R中。这样，在过程执行时，我们也可以输入需要的数据，就好像是在和小海龟对话呢。 现在，我们就可以写出计算不同半径的圆的周长的过程了。 TO ZC PR请输入圆的半径： Make¨R Read IF：R=O THEN STOP (PR圆的周长是：2*PI*：R) ZC END 执行结果如图1 2．3所示。 4．请小海龟出题 小海龟不仅能帮助大家做爸爸妈妈出的算术题，也能帮着爸爸妈妈出题来考我们呢。 TO ZC MakeR Random 20 (PR圆的半径是：：R) PR请算出圆的周长： MakeD Read IF 2*PI*：R一：DO．1 THEN PR恭喜你，答对了! ZC (PR加油啊!圆的周长应该是：2*PI*：R) ZC END 其中，Random n命令的作用是自动随机产生一个1～n(包括n)之间的整数n至于IF语句中的判断条件为什么是2*PI*：R一：D0．1，而不是2*PI*：R=：D呢?这个问题就请同学们开动脑筋，自己找出答案来吧。 L o g o的音乐功能 别看小海龟憨憨的样子，演奏起乐曲来却一点也不含糊。怎么，不相信? 那就请它为我们弹一曲《雪绒花》，见图1 3．1，将大家再一次带回奥地利那圣洁美丽的阿尔卑斯雪山…… 《雪绒花》 奏乐命令Play 请小海龟演奏乐曲和让它画画一样，都要向它发出命令，当然曲谱也是少不了的。格式：Play [曲谱] 功能：请小海龟按照曲谱演奏乐曲。 大家都知道，曲谱中包括音符、音阶、节拍等，可是小海龟却不认识五线谱和简谱，这可怎么办?看来只好麻烦我们替它翻译了。 2．音符 Logo语言中，分别用C、D、E、F、G、A、B来代替简谱中的1、2、3、4、5、6、7七个基本音符，休止符0用P表示，例如，执行命令： P1ay[G F1 E D] 小海龟将弹出5、4、3、2四个音符。 3．音阶 音阶一般是以中音C为起始音，按照音高次序对音符由低至高地排列。Logo语言中，用On(字母O加一个0--6的整数)来表示由低到高的7个八度音阶，n越小音阶越低，PC Logo默认的音阶是03。 下