AUTOCAD LT 2014 円弧について

AUTOCAD LT 2014 を使っています。
円弧の作図で「始点」と「終点」と「円弧長」を入力して円弧を書きたいのですが可能でしょうか。
最終的にはその円の半径が知りたいのです。
よろしくお願い致します。

No.1 ベストアンサー 回答者： shut0325 回答日時： 2014/03/08 12:20

始点と終点の直線距離を求めたうえで、Excelのソルバー使って半径求めたらよいと思います。

円弧長さ：L 始点と終点の距離：D 半径をRとした場合で、

sin(L/2R)-D/2R=0　となるポイントを見つければよいかと。

この回答へのお礼

解決致しました。
回答、感謝致します。
一番回答の早い方をベストアンサーとさせていただきました。

お礼日時：2014/03/08 14:55

No.3 回答者： LHS07 回答日時： 2014/03/08 13:16

LET x=20 !'2点間距離

LET L=21.8918296!'円弧長
LET DELTA=1
LET R0=X/2+DELTA
140
LET R=90*L/( PI *ASIN(X/2/R0)/PI *180)
PRINT R0,R
IF R>R0 THEN
LET R0=R0-DELTA
LET DELTA=DELTA/10
END IF
IF DELTA<0.0000001 THEN
PRINT R0
GOTO 200
END IF
REM
LET R0=R0+DELTA
GOTO 140
200
END

10進BASICより
http://hp.vector.co.jp/authors/VA008683/
10進BASICは以上よりダウンロードできます。

この回答へのお礼

解決致しました。
回答、感謝致します。
一番回答の早い方をベストアンサーとさせていただきました。

お礼日時：2014/03/08 14:54

No.2 回答者： LHS07 回答日時： 2014/03/08 13:00

100 x=20 :'2点間距離

110 L=21.8918296:'円弧長
120 DELTA=1
130 R0=X/2+DELTA
140 R=90*L/( PI *ASN(X/2/R0))
150 PRINT R0,R
160 IF R>R0 THEN R0=R0-DELTA:DELTA=DELTA/10
170 IF DELTA<0.0000001 THEN PRINT R0:END
180 REM
190 R0=R0+DELTA
200 GOTO 140
210 END

でRは15.0000002がでます。
ASN　はアークサイン　角度は度ですが　RADIANしかないものもあります。
精度はDELTA<0.0000001 によってきまります。

SHARP ポケットコンピューター　PC-G850S
言語　BASIC