Get清风CADCAM实验报告.docx

1、Get清风CADCAM实验报告CADCAM实验报告 二叉树的遍历实验一、实验名称：二叉树的遍历实验。二、实验目的：1、掌握CAD/CAM系统中常用的数据结构二叉树的概念、存储结构以及二叉树遍历技术。2、熟练应用C语言编写二叉树的建立，以及用先序、中序、后序遍历方法遍历二叉树的程序。三、实验内容用TC或VC编程，将图2-14所示的二叉树建立链表存储结构，并分别用先序、中序、后序遍历方法遍历该二叉树1、程序流程图2、程序#include #includestruct btree char data; struct btree *lchild,*rchild;*node9; void preorde

2、r(struct btree *node) if(!node) return ; printf(%c,node-data); preorder(node-lchild); preorder(node-rchild); void inorder(struct btree *node) if(!node) return ; inorder(node-lchild); printf(%c,node-data); inorder(node-rchild); void postorder(struct btree *node) if(!node) return ; postorder(node-lchi

3、ld); postorder(node-rchild); printf(%c,node-data);void main() int i; for(i=0;idata=A+i; nodei-lchild=NULL; nodei-rchild=NULL; node0-lchild=node1; node0-rchild=node2; node1-lchild=node3; node2-lchild=node4; node2-rchild=node5; node3-lchild=node6; node3-rchild=node7; node4-rchild=node8; printf(按先序遍历:)

4、; preorder(node0); printf(n按中序遍历:); inorder(node0); printf(n按后序遍历:); postorder(node0); getchar(); return 0;实验结果如下：三、主要仪器设备计算机C+语言环境 实验二 数表的程序化处理一、实验名称：数表的程序化处理二、实验目的1、掌握对工程手册和设计标准中的各种数据表格包括数值、数表、线图的计算机处理技术。2、熟练应用C语言或VC金星编程数据处理程序。三、实验内容用TC或VC编写一个线性插值程序，以下表为根本节点参数，插值计算90-160范围内任意角度的包角修正系数K。/90 100 110

5、 120 130 140 150 160 K1、程序流程图2、程序#include#include#includevoid main() int i,j; int a8=90,100,110,120,130,140,150,160; double k8=0.68,0.74,0.79,0.83,0.86,0.89,0.92,0.95; double m; for(;) do printf(请输入包角值：包角范围为90至160n); scanf(%d,&j); if(j160) printf(包角输入错误，请重新输入。n); printf(按回车键继续查询，按Ctrl+C键退出n); getcha

6、r(); getchar(); system(cls); while(j160); for(i=0;iai&jai+1) m=(ki+1*(j-ai)+ki*(ai+1-j)/(ai+1-ai); printf(包角为%d的包角修正系数为%.3lfn,j,m); printf(请按任意键继续查询，按Ctrl+C键退出n); getchar(); getchar(); system(cls); 实验三 机械零件三维造型一、实验目的四、了解三维造型技术的根本原理；五、熟悉三维造型软件的根本使用方法；六、掌握用三维造型软件构造三维实体零件的步骤。二、实验内容用ProE构造支架零件三、实验报告1、三维

7、零件模型2、零件构成过程是CSG树 实验四 排料图编程绘制3、实验目的七、熟悉AutoCAD中的二次开发工具AutoLISP的各项功能函数；八、了解AutoLISP的编程过程和方法；九、掌握在AutoCAD下实现排料图的绘制技术。4、实验内容板材尺寸为LB,在该板料上气割假设干个半径为R的圆板，如果不计割缝，按实验图中排版方式，问用这块板最多可以割下多少块圆板？编程绘制出排料图。说明：1.L=2000,B=1000,R=(班号*10).学号，如2班3号，R=20.03。2.圆板数用CN变量表示。3.输出圆板数，并绘制排料图。5、实验报告1、画出程序流程图 2、编写程序并调试运行出程序结果1实验

8、程序(defun c:PL() (setq L (getreal n请输入板料长度L:) (setq B (getreal n请输入板料厚度B:) (setq R 50.17) (setq CL (fix (/ L (* 2 R) (setq CB (fix (/ B (* 2 R) (command zoom w (0 0) (L B) (setq p1 (getpoint n输入绘图基点p1) (setq p2 (polar p1 (/ pi 2) B) (setq p3 (polar p2 0 L) (setq p4 (polar p1 0 L) (command pline p1 p2

9、 p3 p4 c) (setq M 0) (while ( M CB) (setq ph (polar p1 (/ pi 2) (* R (+ (* M 2) 1) (setq pc (polar ph 0 R) (setq N 0) (while ( N CL) (command circle pc R) (setq pc (polar pc 0 (* 2 R) (setq N (+ N 1) ) (setq M (+ M 1) ) (setq CN (* CL CB) (prompt (strcat n-圆板数: (itoa CN) -n) )2运行结果输入：L=2000，B=1000输出NC=171