CADCAM試驗(yàn)報告

1、二叉樹的遍歷實(shí)驗(yàn)一、實(shí)驗(yàn)名稱：二叉樹的遍歷實(shí)驗(yàn)。二、實(shí)驗(yàn)?zāi)康模? 1、掌握 CAD/CAICAD/CAI 系統(tǒng)中常用的數(shù)據(jù)結(jié)構(gòu)二叉樹的概念、 存儲結(jié)構(gòu)以及二叉樹遍歷技術(shù)。2 2、熟練應(yīng)用 C C 語言編寫二叉樹的建立，以及用先序、中序、后序遍歷方法遍歷二叉樹的程序。三、實(shí)驗(yàn)內(nèi)容用 TCTC 或 VCVC 編程，將圖 2-142-14 所示的二叉樹建立鏈表存儲結(jié)構(gòu)，并分別用 先序、中序、后序遍歷方法遍歷該二叉樹a1、程序流程圖2、程序#in clude#i ncludestructbtreechardata;structbtree*lchild,*rchild;*no de9;voidpreor

2、der(structbtree* no de)if(! no de)return;prin tf(%c, no de-data);preorder( no de-lchild);preorder( no de-rchild);voidi norder(structbtree* no de)if(! no de)return;in order( no de-lchild);prin tf(%c, no de-data);in order( no de-rchild);voidpostorder(structbtree* no de)if(! no de)return;postorder( no

3、de-lchild);postorder( no de-rchild);prin tf(%c, no de-data);voidmai n()in ti;for(i=0;idata=A+i;nodei-lchild=NULL;nodei-rchild=NULL;node0-lchild=node1;no de0-rchild=no de2;node1-lchild=node3;node2-lchild=node4;no de2-rchild=no de5;node 3-lchild=node6;no de3-rchild=no de7;no de4-rchild=no de8;printf(按

4、先序遍歷:);preorder( no de0);printf(n按中序遍歷:);inorder(no de0);printf(n按后序遍歷:);postorder( no de0);getchar();returnO;實(shí)驗(yàn)結(jié)果如下：三、主要儀器設(shè)備計算機(jī)(C+C+語言環(huán)境)實(shí)驗(yàn)二數(shù)表的程序化處理實(shí)驗(yàn)名稱：數(shù)表的程序化處理二、實(shí)驗(yàn)?zāi)康?、 掌握對工程手冊和設(shè)計規(guī)范中的各種數(shù)據(jù)表格(包括數(shù)值、數(shù)表、線圖)的計 算機(jī)處理技術(shù)。2、 熟練應(yīng)用 C 語言或 VC 金星編程數(shù)據(jù)處理程序。三、實(shí)驗(yàn)內(nèi)容用 TC 或 VC 編寫一個線性插值程序，以下表為基本節(jié)點(diǎn)參數(shù)，插值計算90-160。范圍內(nèi)任意角度的包角

5、修正系數(shù) 匕。a/()90100110120130140150160Ka0.680.740.790.830.860.890.920.951、程序流程圖2、程序#in clude#in clude#in cludevoidmai n()in ti,j;in ta8=90,100,110,120,130,140,150,160;doublek8=0.68,0.74,0.79,0.83,0.86,0.89,0.92,0.95;doublem;for(;)doprintf(請輸入包角值：(包角范圍為 90至 160) n);sca nf(%d,&j);if(j160)prin tf(包角輸入錯

6、誤，請重新輸入。n);printf(按回車鍵繼續(xù)查詢，按 Ctrl+C 鍵退出n);getchar();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 的包角修正系數(shù)為%.3lfn,j,m);printf(請按任意鍵繼續(xù)查詢，按Ctrl+C 鍵退出n);getchar();getchar();system(cls);實(shí)驗(yàn)三機(jī)械零件三維造型實(shí)驗(yàn)?zāi)康乃摹?了解三維造型技術(shù)的基本原理；五、 熟悉三維造型軟件的基本使用方法；六、 掌握用

7、三維造型軟件構(gòu)造三維實(shí)體零件的步驟。實(shí)驗(yàn)內(nèi)容用 ProE 構(gòu)造支架零件三、實(shí)驗(yàn)報告1、三維零件模型2、零件構(gòu)成過程是 CSG 樹實(shí)驗(yàn)四排料圖編程繪制3、實(shí)驗(yàn)?zāi)康钠摺?熟悉 AutoCAD 中的二次開發(fā)工具 AutoLISP 的各項(xiàng)功能函數(shù);八、 了解 AutoLISP 的編程過程和方法；九、 掌握在 AutoCAD 下實(shí)現(xiàn)排料圖的繪制技術(shù)。4、實(shí)驗(yàn)內(nèi)容已知板材尺寸為 LXB,在該板料上氣割若干個半徑為 R 的圓板，如果不計割縫,按實(shí)驗(yàn)圖中排版方式，問用這塊板最多可以割下多少塊圓板？編程繪制出排料圖說明：1 丄=2000,B=1000,R=f號*10).學(xué)號，如 2 班 3 號，R=20.032

8、圓板數(shù)用 CN 變量表示。3.輸出圓板數(shù)，并繪制排料圖。5、實(shí)驗(yàn)報告1、畫出程序流程圖2、編寫程序并調(diào)試運(yùn)行出程序結(jié)果(1) 實(shí)驗(yàn)程序(defu nc:PL()(setqL(getrealn 請輸入板料長度 L:)(setqB(getrealn 請輸入板料厚度 B:)(setqR50.17)(setqCL(fix(/L(*2R)(setqCB(fix(/B(*2R)(comma ndzoomw(00)(LB)(setqp1(getpointn 輸入繪圖基點(diǎn) p1)(setqp2(polarp1(/pi2)B)(setqp3(polarp20L)(setqp4(polarp10L)(comma ndpli nep1p2p3p4c)(setqM0)(while(vMCB)(setqph(polarp1(/pi2)(*R(+(*M2)1)(setqpc(polarph0R)(setqN0)(while(vNCL)(comma