循环控制命令

循环控制命令福州实验小学吴贻小1、步长型（for）循环格式1for

"变量名初值终值［命令序列］功能：变量的值由初值开始，只要不超过终值就重复执行所规定的命令序列（称为循环体），每执行一次循环体后，变量的值增１，直到超过终值为止。

变量置初值变量<=终值命令序列变量值增１FT1、步长型（for）循环求前100个自然数的和。例1?make"s0?for"n1100[make"s:s+:n]?pr:s50501、步长型（for）循环格式2（for

"变量名初值终值［命令序列］步长）功能：变量的值由初值开始，只要不超过终值就重复执行所规定的命令序列，每执行一次循环体后，变量的值增加一个固定值（叫做步长），直到超过终值为止。

变量置初值变量<=终值命令序列变量值增一个步长FT1、步长型（for）循环求前１００个自然数的和也可以用格式２来表示。例1格式１?make"s0?for"n1100[make"s:s+:n]?pr:s5050格式２?make"s0?(for"n1001[make"s:s+:n]-1)?pr:s5050这两种格式的区别仅在于：格式１的步长是１，格式２的步长可以是任意值。当步长为负时，变量的值实际上是在递减，当变量的值小于终值时停止循环。1、步长型（for）循环求前１００个自然数中所有偶数的和。例2?make"s0?（for"n2100[make"s:s+:n]2）?pr:s25501、步长型（for）循环画螺旋正方形（如图）例3?draw?（for"x10120[fd:xrt90]10）螺旋正方形2、当型（while）循环格式While[条件][命令序列]功能：当条件为真时，重复执行所规定的命令序列；当条件为假时，结束循环，执行while命令的后续命令。条件命令序列FT2、当型（while）循环例4求前100个自然数的和。?make"s0?make"n1?while[:n<=100][make"s:s+:n\make"n:n+1]?pr:s50502、当型（while）循环画螺旋正方形（如图）例5?draw?make"x10?while[:x<=120][fd:xrt90make"x:x+10]3、循环的嵌套例6已知公鸡一只5元，母鸡一只3元，小鸡3只一元。用100元买100只鸡，问公鸡、母鸡与小鸡各买多少只？3、循环的嵌套方法1：用for命令嵌套：Tomaiji_1

for"c019[\

for"h033[\make"ch100-:c-:h\if:c*5+:h*3+:ch/3=100\then(pr:c:h:ch)\

]\]end3、循环的嵌套结果：0 25 75418 7881181124843、循环的嵌套例6方法2：用while命令嵌套：tomaiji_2make"c0while[:c<=19]\ [make"h0while[:h<=33]\[make"ch100-:c-:hjimake"h:h+1]\make"c:c+1]endtoji

if:c*5+:h*3+:ch/3=100then(pr:c:h:ch)end3、循环的嵌套例6tomaiji_2make"c0while[:c<=19]\ [make"h0while[:h<=33]\[make"ch100-:c-:hjimake"h:h+1]\make"c:c+1]endtoji

if:c*5+:h*3+:ch/3=100then(pr:c:h:ch)end注意不能写在第一个while上面方法2：用while命令嵌套：pr输出多个对象时需加小括号if命令序列后没有end或]，而是还有语句时需改过程调用3、循环的嵌套例6方法3：用while命令嵌套for命令：tomaiji_3make"c0while[:c<=19]\ [for"h033[make"ch100-:c-:h\if:c*5+:h*3+:ch/3=100(pr:c:h:ch)]\make"c:c+1]end注意与字符隔开3、循环的嵌套例7编写画正方形环图的带参过程。方法1.用repeat命令嵌套tozfxht1:m:srepeat:m[repeat4[fd:srt90]rt360/:m]End?ZFXHT13100方法2.用for命令嵌套tozfxht2:m:sfor"x1:m[for"y14[fd:srt90]rt360/:m]end3、循环的嵌套例7编写画正方形环图的带参过程。方法3.用while命令嵌套tozfxht3:m:smake"x1while[:x<=:m][make"y1\while[:y<=4][fd:srt90make"y:y+1]\

rt360/:mmake"x:x+1]end习题14.鸡兔同笼问题。鸡比兔多26只，共有274只脚，问鸡、兔各有多少只？tojitufor"ji26137[\make"tu:ji-26if:ji*2+:tu*4=274\then(pr:ji:tu)]end习题15.女儿现年8岁，母亲现年38岁，问几年后母亲年龄是女儿年龄的3倍？习题16.有一把围棋子，三个三个地数，最后余下两个；五个五个地数，最后余下三个；七个七个地数，最后余下两个。问这把棋子最少有多少个？toweiqi

make"n0while[(ornot(remainder:n3)=2\not(remainder:n5)=3\not(remainder:n7)=2)]\[make"n:n+1]pr:nend习题17.编写求任意两个自然数最大公约数与最小公倍数的带参过程。求最大公约数：tozdgys:a:bmake"r(remainder:a:b)while[not(:r=0)]\[make"a:b\make"b:r\make"r(remainder:a:b)\]pr:bend习题17.编写求任意两个自然数最大公约数与最小公倍数的带参过程。tozxgbs:a:b

make"m:amake"n:bmake"r(remainder:a:b)while[not(:r=0)]\[make"a:b\make"b:r\make"r(remainder:a:b)\]

pr:m*:n/:bend习题18.输出九九乘法表。tocfbfor"i19[pr[]for"j1:i[(type:i*:j[])]]end12436948121651015202561218243036714212835424981624324048566491827364554637281

习题20.输出下面数的前20项，并以此数据为边长画螺旋长方形。tolxcfxmake"n0for"i120[make"n:n+:ipr:nfd:nrt90]end1，1+2，1+2+3，1+2+3+4，1+2+3+4+5，…….习题21.输出所有的“水仙花数”。所谓“水仙花数”，是指一个三位自然数，其各位数字的立方和等于该数本身。例如，153是一个水仙花数，因为153＝13+53+33.tosxhfor"i100999[make"bint:i/100\make"sremainder(int:i/10)10\make"gremainder:i10\if:b*:b*:b+:s*:s*: