- UID
- 2861
- 积分
- 0
- 精华
- 贡献
-
- 威望
-
- 活跃度
-
- D豆
-
- 在线时间
- 小时
- 注册时间
- 2002-2-21
- 最后登录
- 1970-1-1
|
发表于 2002-4-18 21:39:09
|
显示全部楼层
Re: [测试]:好多天没什么动静啊?出个题大家玩玩吧....8-):全用ACAD作图(不会MS),不用算,无辅助线,无加减法,连90以外的数字都不用的方案。
最初由 e2002 发布
[B]已知一矩形长边为90,内有与矩形四边相切切两两相切的五个圆,
现在要求:阴影部分的面积和圆半径.
不得使用数学解析求解喔
:b :1 :4 :6 :3 :5 :2 :7 :c [/B]
全用作图法,不用计算,不用辅助线,连加减法都不用的方案:
1 假定图已经画好,连加减法都不用:
(1) 求半径时
Command:dist
First point: nea
to Second point: cen
of
Distance = 16.4711, Angle in XY Plane = 54.2131, Angle from XY Plane = 0.0000
Delta X = 9.6319, Delta Y = 13.3613, Delta Z = 0.0000
(2)求面积时:
Command: area
<First point>/Object/Add/Subtract: a
<First point>/Object/Subtract: o
(ADD mode) Select objects:
Area = 5929.6115, Perimeter = 311.7691
Total area = 5929.6115
(ADD mode) Select objects:
<First point>/Object/Subtract: s
<First point>/Object/Add: o
(SUBTRACT mode) Select objects:
Area = 852.3096, Circumference = 103.4912
Total area = 5077.3020
(SUBTRACT mode) Select objects:
Area = 852.3096, Circumference = 103.4912
Total area = 4224.9924
(SUBTRACT mode) Select objects:
Area = 852.3096, Circumference = 103.4912
Total area = 3372.6829
(SUBTRACT mode) Select objects:
Area = 852.3096, Circumference = 103.4912
Total area = 2520.3733
(SUBTRACT mode) Select objects:
Area = 852.3096, Circumference = 103.4912
Total area = 1668.0638
(SUBTRACT mode) Select objects:
<First point>/Object/Add:
2 假定没有画好,只有90这个长度来画:
先假定高度为长度,画竖线
Command: line
From point:
To point: @90<90
To point:
以线中点和端点进行两点画圆:
Command: c
CIRCLE 3P/2P/TTR/<Center point>: 2p
First point on diameter: mid
of
Second point on diameter: end
of
把该圆复制到上面,用下象限点和中点为基点和目标点
Command: cp
COPY
Select objects: 1 found
Select objects:
<Base point or displacement>/Multiple: end
of Second point of displacement: mid
of
把圆向右移,用右象限点和中点为基点和目标点
Command: m
MOVE
Select objects: Other corner: 2 found
Select objects:
Base point or displacement: qua
of Second point of displacement: per
to
画中间的圆,不用输入半径,系统自动用上一次的半径。
Command: c
CIRCLE 3P/2P/TTR/<Center point>: ttr
Enter Tangent spec:
Enter second Tangent spec: Radius <22.5000>:
用镜像得到右边的圆和竖直线,中心圆的中心为镜像轴线的一点。
Command: mi
MIRROR
Select objects: Other corner: 3 found
Select objects:
First point of mirror line: cen
of Second point:@90<90
Delete old objects? <N>
画上线和下线
Command: l
LINE From point: end
of
To point: end
of
To point:
Command:
LINE From point: end
of
To point: end
of
To point:
连结四线
Command: pe
PEDIT Select polyline:
Object selected is not a polyline
Do you want to turn it into one? <Y>
Close/Join/Width/Edit vertex/Fit/Spline/Decurve/Ltype gen/Undo/eXit <X>: j
Select objects: Other corner: 1 found
Select objects: Other corner: 1 found
Select objects: Other corner: 1 found
Select objects: Other corner: 1 found
Select objects:
3 segments added to polyline
Open/Join/Width/Edit vertex/Fit/Spline/Decurve/Ltype gen/Undo/eXit <X>:
Command:
关键是这一步,用了CAL,很不常用的。
Command: sc
SCALE
Select objects: Other corner: 6 found
Select objects:
Base point: int
of
<Scale factor>/Reference: 'cal
>> Expression: tang(ang(end,end))
>> Select entity for END snap:(矩形的左下角)
>> Select entity for END snap:(矩形的右上角)
Command:
这是,可回到1的情况来处理了。
MS的方案不直到怎样作。 |
|