• ベストアンサー

AUTOCAD LT 2014 円弧について

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

質問者が選んだベストアンサー

  • ベストアンサー
  • shut0325
  • ベストアンサー率40% (490/1207)
回答No.1

始点と終点の直線距離を求めたうえで、Excelのソルバー使って半径求めたらよいと思います。 円弧長さ:L 始点と終点の距離:D 半径をRとした場合で、 sin(L/2R)-D/2R=0 となるポイントを見つければよいかと。

bumiken3biki
質問者

お礼

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

その他の回答 (2)

  • LHS07
  • ベストアンサー率22% (510/2221)
回答No.3

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は以上よりダウンロードできます。

bumiken3biki
質問者

お礼

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

  • LHS07
  • ベストアンサー率22% (510/2221)
回答No.2

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

関連するQ&A