2023-11-21 15:54来源:m.sf1369.com作者:宇宇
海龟作图源程序(1)
#include graphiCS.h
#include math.h
#include stdio.h
#include conio.h
#include bios.h
#include dos.h
#include io.h
char key_state[128],key_pressed[128];
void interrupt far (*OldInt9Handler)();
enum modes {AUTO, HIGH};
enum bool {FALSE=0, TRUE=1};
#define MODE enum modes
....
35 个 源程序 xgdown 有
电脑里面的程序控制海龟的是PC logo程序,这是一种计算机程序设计语言,Logo内置一套海龟绘图系统,通过向海龟发送命令,能够直观地学习程序的运行过程,因此它非常适合于作为用于少儿计算机教育的启蒙编程语言工具,它的设计初衷主要是为了向儿童教授计算机编程技能。
得到如下代码:
#includeint main() { double dist = 0.0; int i; for (i = 1; i <= 3600; ++i){ dist += 1.0 / i; } printf(一小时爬行%f米\n, dist); dist = 0.0; for (i = 1; ; ++i){ dist += 1.0 / i; if (dist > 10){ break; } } printf(爬出10米需要%d秒\n, i); return 0; }
二、LOGO语言程序设计
(一)基本指令
1.带参数的指令:
前进 FD 向左转 LT 画矩形 STAMPRECT 横坐标定位 SETX 设置线宽 SETW
后退 BK 向右转 RT 画椭圆 STAMPOVAL 纵坐标定位 SETY 设置颜色 SETPC
重复 REPEAT 等待 WAIT 打开编辑器 EDIT 坐标定位 SETXY
2.不带参数的指令:
抬笔 PU 藏龟 HT 清除屏幕 CLEAN 初始化 DRAW 填充 FILL
落笔 PD 显龟 ST 清屏复位 CS 清除文字 CT 橡皮擦 PE
(二)基本练习
1.FD -100与BK 100作用相同;LT 90与RT -90作用相同。
2.在使用了PU或PE指令之后,要继续画图形需要用PD指令。
3.重复指令画正多边形 REPEAT 边数[FD 边长 RT 360/边数]
4.重复指令画指定大小的圆 REPEAT 36[RT 5 FD 直径*PI/36 RT 5]
5.减少上个指令中的重复次数,就可以画指定大小的圆弧。
6.用LOGO语言编写的程序可以进行绘图,也可以进行计算和编写音乐。
7.在编写过程时,过程开始必须有TO,结束必须有END。
8.如果在过程中使用了变量,变量名前面一定要加冒号。
9.DRAW、CS、CLEAN都可以用来清除屏幕,但作用有所不同。
10.用LOGO语言编写的程序过程也可以保存在计算机里。
11.用重复指令画多角星 REPEAT 角数[FD 线长 RT 180-180/角数]
12.WAIT和空重复REPEAT 100[]都可以起到延时的作用。
13.(STAMPOVAL :X :Y “TRUE)指令可以画一个实心圆。
(三)编写过程
1.画蝴蝶
TO SJX :X
REPEAT 3[FD :X RT 120]
END
TO HUDIE
RT 60 SJX 30 SJX 60
RT 180 SJX 30 SJX 60
RT 100 FD 60 BK 60
RT 40 FD 60 HOME
END
2.画转动的风车
TO BY
FD 100 RT 90
REPEAT 18[RT 5 FD 100*PI/36 RT 5]
END
TO FC
REPEAT 4[BY]
END
TO Z
REPEAT 36[FC WAIT 20 RT 10 CLEAN]
END