圆上找一点之九{圆上某点到圆外两点距离之比最小}

gongwen0519

求定圆上一点到圆外两定点的距离之比最小。
* r, |  Q: r! ]: I( n3 S" b9 G/ F(不反对您用尺寸驱动及形位约束软件)
, w7 k" c8 w9 r3 t: l8 D6 q8 ^
/ a& C* |/ q, O9 h0 c, [9 y  T

' I) K2 P) H: {& d

xhq1954425

3 ~6 X6 n0 }' m) P- V0.481839048



0.481839048
0 ~# x3 G( k' X6 O7 W8 ?. \& l. ~0 k% e0 o4 ]
3 p4 X, D0 I( d% F
! [* b, k8 L# D# |  f2 L
4 n+ y, X; P9 Y$ h

gongwen0519

xhq1954425 发表于 2015-7-27 13:10
0.481839048

楼上把精度搞到这个程度已经很不错了，赞一个！
! G' e, F, _% E. z如果采用计算手段，则结果如下：
0 I/ L; Q7 b, S! m

0 S& P2 y$ ~) j6 d

" t) q( Z3 C$ z% z2 ?


$ K& r+ E( L9 K. O% |+ Q! O

gongwen0519

本题如果大家有意往阿氏圆方面去考虑（结果是阿氏圆这个道理，但绝对不要去作什么阿氏圆），可能会收到较好的效果，寥寥两三个尺规作图步骤就可以搞定的。
, G  _! _- ?1 Y
# r! w0 k1 h# Y, U. G' D8 }  b* `下面把那个圆极化成直线（即圆的半径无穷大）的情况给大家公布一下。（不过本帖的作法要比这个直线型的还要简单得多）
' m0 n* v* d, W- g! n$ |, H$ u  m

$ x; k. m& \, V  c3 ]; h0 O7 [
% T5 l4 N+ N3 g' P$ z) \

xhq1954425

9 `) d# r" c/ l0 r# `
程序辅助逼近法，为了展示逼近过程，在程序运行初期有限使用了慢动作，实际运行时间不超过2秒，从中也感觉到ＣＡＤ软件本身的计算精度并不很高，图中可移动的坚线逼近理论正确点的Ｘ轴方向的最小距离设定为0.00000000000000000000000000000000000000001，但是感觉很快就判定为0值了………

2 G" }7 k8 O3 J: Q
& t7 h8 C/ t+ o: }7 P2 n$ F; X8 J/ `" `

gongwen0519

xhq1954425 发表于 2015-7-28 13:26
- I6 Z9 @6 G, X/ Z! s程序辅助逼近法，为了展示逼近过程，在程序运行初期有限使用了慢动作，实际运行时间不超过2秒，从中也感觉 ...

感谢参与！有劳了。
手大笔呀，呵呵，杀鸡都用上牛刀了。楼上用的是vba吧（lisp没这么高的精度），不知贵先生用的是什么算法，按道理在CAD有效精度内应该是不会相差这么“大”，至少8~16位有效数值是应当可以达到或保证的。在下用普通的尺规绘图方法，其结果与计算值都能较好的吻合，见下图所示：
+ J4 E, H8 V  m/ u# H  v

gongwen0519

' b( R/ ^3 r" ^
下图只是说明在什么时候那个PA：PB最小（阿氏圆和已知圆相切时），并非实际需要的作图（4楼有云：绝对不要去作什么阿氏圆）。

本帖改自《初等数学复习及研究(平面几何)》某道练习题，卖个关子：实际作图过程比这个说明插图要简单些。
+ \' a# _4 C+ Q! y

  K/ A8 N4 H/ R6 L
) a$ L( a7 L6 E8 Y  F
) B2 A5 Y) [1 ?$ g3 B0 c) q5 k- C

: j2 W5 V" v' N0 e+ W# C% B0 Z9 ?# `
; j: P6 r: t5 }! t' {1 j0 y


) f& Q4 @: k$ x( w% I. L2 l% B
- M1 I+ y# e8 G: F

xhq1954425

gongwen0519 发表于 2015-7-28 19:08
感谢参与！有劳了。
手大笔呀，呵呵，杀鸡都用上牛刀了。楼上用的是vba吧（lisp没这么高的精度），不知 ...

应该是意在练牛刀（用lisp描述作图逼近方法）至于到底能否杀死这只难杀的鸡并不重要，试验说明速度还是够快，但精度还是差了一些，把那两线比值用别的计算器算了一下，只是小数点后10位相同……也可能是因为逼方法（重点考虑了编程方便）不够先进（或lisp本身精度差）造成的。感谢你的题目使我取得了一些编程经验……


7 @1 z/ J4 H- _% a( f/ p/ m, a* i. p9 O

xhq1954425

$ S: Y7 Y1 D( w
/ @  K/ ^( s$ @刚才在程序中加入了打印命令，因ＬＩＳＰ最多能显示出小数点后16位，从结果分析已经有小数点后15位是精确的，只是在此之前我不知道精度原来还可以，说明逼近画法是合理的：
2 h3 c3 [) F) }' i( v7 K+ W( e

9 ]( ]/ l. W2 r! b9 Y  v5 @2 L, _0 k
$ k# q1 _9 ^. u

gongwen0519

xhq1954425 发表于 2015-7-29 08:15
刚才在程序中加入了打印命令，因ＬＩＳＰ最多能显示出小数点后16位，从结果分析已经有小数点后15位是精确 ...

呵呵，CAD的系统精度就是16位。(16位有效数字，不管小数还是整数)

我爱用acad

两位大师好厉害！
这个题目我无从下手啊，我只能采用版大的“精确选点法”试了好久，好累！

gongwen0519

& W/ n+ H- [$ [: c

我爱用acad 发表于 2015-7-30 13:59
8 I8 a/ a% t" T两位大师好厉害！
( h% l- C% i% [  i这个题目我无从下手啊，我只能采用版大的“精确选点法”试了好久，好累！

0 a, j( ^& c. k" S7 e  y+ ]8 [前面已经提到多次了，这个帖子超级简单，用“精确选点法”挺费神的。

提示一下：本帖简单到就是个三点画圆，不过就是还要去找”另一点“（在线段AO或BO上，呵呵）。

0 h2 M) F7 e  o
" V$ m8 P) I3 x; w' y$ `

6 C! i0 W& v* U0 H" y# y# X+ W

xhq1954425

我爱用acad 发表于 2015-7-30 13:59
' K% t0 X- k+ f6 q# @两位大师好厉害！
6 d& K% @# f7 X( ~  s这个题目我无从下手啊，我只能采用版大的“精确选点法”试了好久，好累！

' b9 z6 |6 [- B. b9 R$ V) V8 d还是说成“一位大师好厉害”比较准确，跟gongwen0519相比，人家是几何画法的专家，我只是用土办法尝试了一下，如果不是借助编程我也是束手无策……

gongwen0519

xhq1954425 发表于 2015-7-31 15:41
还是说成“一位大师好厉害”比较准确，跟gongwen0519相比，人家是几何画法的专家，我只是用土办法尝试了 ...

( c( o5 T7 W8 S' r3 s1 s9 i贵先生有点过谦了。
# r6 W0 A. |7 n# e

感谢两位一直以来关注本贴，明天就是八一节了，祝大家开心：




7 H1 o: G( C6 z9 S* u2 X9 ]原题目就是：求过两已知点作圆，使之正交于一已知圆。


* J  l1 M6 }) Z) U