掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
座標を求めるには？ (ID：28177)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
複素数を使えばさらに簡単になります。2点をあらわす複素数をCP1,CP2としたとき、ベクトルP1→P2はCP2-CP1で，その長さをTotalとします。点P1からPL間での長さをLとすると，ベクトルP1→PLは（CP2-CP1)*L/Totalとなります。以上を踏まえて実際のプログラムは次のようになります。なお，uses節にvarCmplxを追加してください。 var CP1,CP2,CPL:variant;Total,L:double; begin CP1:=varComplexCreate(x1,y1); CP2:=varComplexCreate(x2,y2): CP2:=CP2-CP1; Total:=varComplexAbs(CP2); CPL:=CP1+CP2*L/Total;//Lは既知とする //目的の座標を求める xL:=CPL.real; yL:=CPL.Imaginary; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.