编写autolisp程序并通过visual lisp集成开发环境调试该程序 :程序文件名为drawing.lsp,程序中定义了函数drawing,用于根据用户指定的圆心位置和半径绘一个基圆和与该圆同心的另外三个圆,这三个

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 00:50:50
编写autolisp程序并通过visual lisp集成开发环境调试该程序 :程序文件名为drawing.lsp,程序中定义了函数drawing,用于根据用户指定的圆心位置和半径绘一个基圆和与该圆同心的另外三个圆,这三个

编写autolisp程序并通过visual lisp集成开发环境调试该程序 :程序文件名为drawing.lsp,程序中定义了函数drawing,用于根据用户指定的圆心位置和半径绘一个基圆和与该圆同心的另外三个圆,这三个
编写autolisp程序并通过visual lisp集成开发环境调试该程序
:程序文件名为drawing.lsp,程序中定义了函数drawing,用于根据用户指定的圆心位置和半径绘一个基圆和与该圆同心的另外三个圆,这三个圆的半径依次是与其相邻的前一个圆半径的1.2倍.

编写autolisp程序并通过visual lisp集成开发环境调试该程序 :程序文件名为drawing.lsp,程序中定义了函数drawing,用于根据用户指定的圆心位置和半径绘一个基圆和与该圆同心的另外三个圆,这三个
(defun c:drawing()
(setvar "cmdecho" 0)
(setq ptcenter (getpoint "\n请输入圆心位置:"))
(setq dist(getdist "\n请输入基圆半径:"))
(command "_circle" ptcenter dist)
(command "_circle" ptcenter (* dist 1.2) )
(command "_circle" ptcenter (* dist 1.2 1.2) )
(command "_circle" ptcenter (* dist 1.2 1.2 1.2) )
(princ)
)
再保存为drawing.lsp就OK了...

编写autolisp程序并通过visual lisp集成开发环境调试该程序 :程序文件名为drawing.lsp,程序中定义了函数drawing,用于根据用户指定的圆心位置和半径绘一个基圆和与该圆同心的另外三个圆,这三个 autolisp中画两圆公切线的程序怎么写? 编写一个程序并画出框图 编写一个AutoLISP程序,画一个边长为S1、S2,夹角为W的平行四边形,程序还应提示用户输入起点PT1,长度S1、S2及夹角W.回答这个就行, autolisp教程 请高手用AutoLISP编写4个小程序:函数名为tuxing,要求执行此函数时使用键盘输入两个同心圆的圆心坐标和每个圆的半径值,然后:1.自动绘出这两个圆和水平,垂直的两条中心线2.自 编写一个程序,通过指针变量找出一维数组中的最大值和最小值,并交换最大值和最小值的位置. 编写程序,输入一批学生的成绩,遇0或负数则输入结束,要求统计并输出优秀(大于85)、通过(60~84)和不及格(小于60)的学生人数.C程序 求编写一个matlab程序程序能产生两个随机变量,并满足二者正交. 编写程序并画出程序框图,任意输入三个实数,输出这三个实数的最小值 编写一个autolisp程序,从p1点,画线到p2点,然后从p2点画线到p3点,两条线夹角为90°,然后倒圆角R=20,请问这个程序应该怎么写,我知道画线这个的写法,请问后面倒角应该怎么写?(setq p1(getpoint)(setq 编写程序,计算S 怎样编写这个程序 通过函数调用方式编写程序,计算n*n矩阵主次对角线元素绝对值之和 关于求阶乘.编写程序,计算下面公式并输出结果.要求:(1)编写一个求阶乘n!的函数fact(n).,(可以用累乘法,也可以用递归法).(2)编写主函数,由键盘输入n和m,通过嵌套调用(1)中的函数 编写程序,求1!+2!+……n!,要求从主函数输入n的值,用函数实现阶乘的计算,并通过函数值返回C语言的啊, 求大神指教:用C编写程序,求出1-1000能被7或11整除的所有整数,并将其放在a所指的数组中,通过n返回这些数的个数 通过matlab编写语言程序已知传递函数(可以随意用一个 分母四阶的 分子为1就行) 求阶跃输入的响应曲线 并确定K、T、τ 编写一个AutoLISP程序,从p1到p2点画一条直线.直线p1p2与正x轴夹角为A,p1点与p2点间的距离L,在p1 p2及其中点分别画一个园,圆直径为D1(D1=L/4).要求提示输入:p1 L A.