第七课 画同心圆 课件

课件13张PPT。请欣尝同心圆第七课 《画 同 心 圆》教学目标： 1、利用Small Basic进行设计画同心圆的程序，培 养同学们对电脑编程的兴趣，培养创造性思维。 2、熟悉画椭圆或圆的命令及操作。 教学重点和难点： 重点：熟悉画椭圆或圆的命令及操作。 难点：进一步熟悉GraphicsWindow的坐标系，能够 利用坐标系确定所画椭圆或圆的位置。画一个正36边形S=36 Length=20 E=360/S For i=1 to S step 1 Turtle.Move(Length) Turtle.Turn(E) EndFor———（近似圆）如何画圆 圆是椭圆的一个特例。在 Small Basic 的图形窗口中画圆和画椭圆都是用DrawEllipse 操作，它格式如下： GraphicsWindow.DrawEllipse( a , b , width , height ) X坐标 y坐标 （椭）圆的宽度 （椭）圆的高度 例如： GraphicsWindow.DrawEllipse(300,200,100,100) GraphicsWindow.DrawEllipse(300,200,300,200) （猜一猜：哪一个椭圆，哪一个圆？）(x,y)(x+g,y+g)g(x+2g,y+2g)同心圆是指圆心相同半径不同的圆。如何画同心圆 如果用变量g表示相邻的同心圆之间的半径差，变量d 表示圆的直径，则上面的三个由外到里的同心圆的坐标分别是（x,y），（x+g,y+g），（x+2g,y+2g）。 如何画同心圆 下面是（由外到里）画同心圆的程序： g=20 d=400 x=100 y=100 While d>1 GraphicsWindow.DrawEllipse(x,y,d,d) d=d-2*g x=x+g y=y+g EndWhileg表示相邻的同心圆之间的半径差d 表示最大圆的直径最大圆x坐标最大圆y坐标这里的d表示从外往里的第2个圆、第3个圆……的直径这里的x表示从外往里的第2个圆、第3个圆……的x坐标这里的y表示从外往里的第2个圆、第3个圆……的y坐标画圆的格式变量d控制循环，每次循环都减少2*g，直到d>1不成立时结束直径为d直径为d-2g分析图小试身手仿照课本P36画同心圆的程序画一组同心圆。 画同心圆的参巧程序（课本P36）： g=10 d=200 x=100 y=100 While d>1 GraphicsWindow.DrawEllipse(x,y,d,d) d=d-2*g x=x+g y=y+g EndWhile 1、画（椭）圆的程序： GraphicsWindow.DrawEllipse(a , b ,width , height ) 2、画同心圆的循环语句： While…… EndWhile知识小结附：同心正方形程序 g=8 d=110 x=100 y=100 While d>1 GraphicsWindow.DrawRectangle(x,y,d,d) d=d-2*g x=x+g y=y+g EndWhile 附：同心圆程序 g=8 d=110 x=100 y=100 While d>1 GraphicsWindow.DrawEllipse(x,y,d,d) d=d-2*g x=x+g y=y+g EndWhile 课外作业 利用本节课所学到知识画出下面图形（提示画同心正方形DrawRectangle的程序与画同心圆相似）。再见！