计算机辅助设计与制造复习题一、选择题1.计算机辅助制造进行的内容有【】A.进行过程控制及数控加工B.CADC.工程分析D.机床调整答案：A2.加工过程优化计算中，可控变量有【】A.刀具材料B.切削力C.切削速度D.切削温度答案：C3.图素的简单含义是【】A.零件图形分解出来的基本图形B.零件图形的基本颜色C.图形的坐标增量D.图形的精确程度答案：A4.在CAD作业中，采用数据文件形式来处理工程数表、线图数据，其目的是A.减少占用内存，使数据文件独立于计算程序B.减少占用内存，使数据文件与计算程序融为一体C.占用大量内存，较好解决数据共享D.占用外存，使数据文件与操作系统紧密结合答案：A5.使用下列哪种操作可实现实体的全剖、半剖和局部剖切【】A.旋转切除B.拉伸切除C.扫描D.放样答案：B6.在单链表里，每个结点的存贮单元分为两部分，一是存放结点的数据，另一部分存放指向后继结点的【】A．关系 B．单位 C．指针 D．数据答案：C7.直线插补运算是一些【】的加减运算。
A.偏差值B.斜率和最终坐标值C.坐标值D.直线坐标答案：B8.某绘图软件，画线语句为DRAW，其参量U、D、E、G表示向上、向下、向右上、向左下画线，B、N表示不画线和画后返回原起点，则语句DRAW“NE141；BU100；G141；BU100；G141”表示【】A．画一条曲线 B．画一条直线 C．画二条直线 D．画三条直线答案：D9.在关系型数据结构中，数据的逻辑结构被归结为满足一定条件的【】A.线性表B.单链表C.二维表D.多维表答案：C10.在二维图形的旋转变换中，其旋转中心【】A.只能位于图形边界内B.只能位于图形边界外C.只能位于坐标原点D.可位于任意点答案：D二、简答题1.已知直线AB两端点的坐标为A(2,30,,B(5,6.写出使直线AB以坐标原点为中心顺时针旋转90的变换矩阵，并求出变换后直线AB的坐标矩阵。
答案：（1） AB的齐次坐标矩阵为(2绕原点顺时针旋转90°的变换阵为：(3变换后直线AB的坐标矩阵为：2.比较说明AutoLISP和VB（或VBA）开发AutoCAD的特点。
答案：相同点：都是对AutoCAD的扩充，都具有一般高级程序设计语言的特点。
不同点：AutoLISP是一种表处理语言，善于处理不定长数据，采用前缀表达，文件及数据库处理较弱，与AutoCAD的通讯通过command函数实现。
图形界面通过DCL定义语言实现，不易实现。
无法生成EXE文件。
VB则是一种可视化程序设计语言，界面设计方便，可使用多种界面控件，所见即所得。
采用事件驱动的方式编程，有强大的处理数据库的功能，有利于大型系统的实现。
与AutoCAD的通讯则通过COM对象实现。
可生成EXE可执行文件，便于程序的保密与发布。
3.解释CAD，CAE，CAM，CAPP，CIMS的作用。
答案：答案：CAD (Computer Aided Design 计算机辅助设计,即使用计算机帮助人们进行产品和工程设计。
CAM (Computer Aided Manufacturing 计算机辅助制造，是利用计算机来代替人去完成制造以及与制造系统有关的工作。
CAE (Computer Aided Engineering 计算机辅助工程。
主要是实现结构分析和结构优化，应用最广泛、最成熟的是有限元分析。
CAPP (Computer Aided Process Planning 计算机辅助工艺设计：设计与制造之间的桥梁，确定加工方法，加工顺序，工、夹、量具以及切削条件等。
CIMS (Computer Integrated Manufacturing System 计算机集成制造系统，即将各种与制造有关的技术活动与系统集成起来。
4.一个普通的CAD系统（不包括计算机绘图），基本的硬件配置有哪些？其应用软件应包括哪些？答案：基本的硬件配置为主机、打印机、键盘及显示器；其应用软件包括数据库、计算方法库、数学模型建立模块、有限元模块、优化设计模块等。
5.当你运行一个综合式CAPP系统时，举例说明其怎样体现了综合式设计原理？答案：某些工艺准则如先粗后精、优化计算切削用量等由机器自动决策，进行计算，体现出部分创成原理，而安排工艺路线、选择加工方法，选择设备、刀具等均由人机交互，有的由机器到数据库中检索，有的由人工确定，故体现了综合式设计原理。
6.机械产品设计中有大量的表格数据，在进行CAD编程时，怎样将其程序化？答案：（1）数据的公式化（2）将数据编制在程序中（3）将数据写入数据文件（4）采用数据库的方式7.CAPP中决策的方式有哪些？答案：决策表、决策树、专家系统。
8.开发机械CAD系统时涉及到的设计手册上的数据应如何处理？答案：答案：找到原始公式，将公式编入程序，这是最精确的程序化处理方法。
否则：对于表格：利用数组（表）存储相应的值，再直接查找或插值计算。
对于线图：将线图离散化为数表再处理，或：用曲线拟合的方法求出线图的经验公式。
其外部存储可采用数据文件或数据库的方式。
三、论述题1.图示是显示在屏幕上的，由各顶点的坐标按照顶点与顶点之间邻接关系画出的立体图。
试回答：（1）此立体图是否只表示一种物体形状？（2）应将此图形做什么处理，才表示明确的、立体感强的立体图？（3）试画出将此图形经处理后的两个不同的立体图。
答案：（1）不只表示一种物体（可理解成几种不同的情况）；（2）必须消去形体上不可见部分的线段；2.给下列程序加上注释，并解释其功能。
(defun fun2 (/ p pb(setq pb '( p (getpoint "\n 第一点:"(while p(setq pb (cons p pbp (getpoint "\n 下一点(输入完请回车:"(setq pb (reverse pb(apply 'command (cons "pline" pb(command答案：答案：(defun fun2 (/ p pb ；定义函数(setq pb '( p (getpoint "\n 第一点:" ；输入点(setq pb (cons p pb ；将用户输入的点构造成表p (getpoint "\n 下一点(输入完请回车:"；循环输入点，直至用户回车(setq pb (reverse pb ；将表反序，即先输入的点在最前面(apply 'command (cons "pline" pb ；调用pline绘制曲线(command ；结束pline命令定义函数，实现由用户输入一系列的点，按输入的先后顺序绘制复合线。
3. 试论述有限元分析方法在机床设计中的作用及求解问题的一般流程。
答案：（1）作用是分析机械产品的动、静、热特性。
（2）工作流程要点是：①单元划分、节点编号、输入原始数据；②建立单元刚度矩阵，形成总体刚度矩阵；③形成载荷列阵，进行边界条件处理；④求解刚度方程，输出计算结果。
（画成流程框图的形式亦可）4.给下列程序加上注释，并解释其功能。
(defun fun1 (/ s1 n h1 e(setq s1 (ssget "x" n 0h1 (getdist "\n请输入新的高度"(repeat (sslength s1(setq e (entget (ssname s1 n(if (= "TEXT" (cdr (assoc 0 e(progn (setq e (subst (cons 40 h1 (assoc 40 e e (entmod e;if;repeat(princ;defun答案：答案：defun fun1 (/ s1 n h1 e ；定义函数(setq s1 (ssget "x" n 0 ；选择当前所有的实体h1 (getdist "\n请输入新的高度"；变量赋初值(repeat (sslength s1 ；对当前每一个实体进行如下操作(setq e (entget (ssname s1 n ；获得实体数据n (1+ n(if (= "TEXT" (cdr (assoc 0 e ；判断是否是文本(progn (setq e (subst (cons 40 h1 (assoc 40 e e (entmod e；如果是文本，则将其高度修改为用户输入的新值;if;repeat(princ ；避免多余的输出功能：定义函数，实现将当前所有的文本高度修改为用户输入的新高度。
四、综合题1.试通过操纵AutoCAD图形数据库，将屏幕上一条任意直线修改为水平线。
答案：(defun modln (/ pt1 pt2 m e(setq pt1 (osnap(getpoint "\n select end point of line:""endp"(if pt1(setq e1 (ssname (ssget pt1 0(setq m (if (equal (cdr(assoc 10 (setq e2 (entget e1pt11011(if (= m 10(setq n 11(setq n 10(setqpts (cdr (assoc n e2pt2 (list (car pt1 (cadr ptse2 (subst (list m (car pt2 (cadr pt2 0(list m (car pt1 (cadr pt1 0e2(entmod e2(princ(modln1. 2.一标准化零件的参数如表所示，请编制其绘图程序。
要求：运行程序时用户只需输入型号即可从事先建立好的数据文件中读取数据并绘制其二维零件图。
型号宽度高度半径a1 50 40 5a2 75 60 10a3 100 80 15a4 150 110 20答案：答案：用任意的文本编辑器编辑文本文件data.txt如下,数据之间用空格分隔。
(xh width height radius("a1" 50 40 5("a2" 75 60 10("a3" 100 80 15("a4" 150 110 20(defun js (fname item / fp data(setq fp (open fname "r"head (read (read-line fpdata (read (read-line fp(while (not (equal (car data item(setq data (read (read-line fp(mapcar 'set head data(close fp(defun part ((setq ptype (getstring "please input the type:" (js "f://teach//lisp//data.txt" ptype(setq pc (getpoint "center:"pt (polar pc pi (* 0.5 widthp1 (polar pt(* 1.5 pi(* 0.5 heightp2 (polar p1 (* 0.5 pi heightp3 (polar p2 0 widthp4 (polar p1 0 width(command "circle" pc radius "line" p1 p2 p3 p4 "c" (part。