「余弦定理」の編集履歴（バックアップ）一覧はこちら

余弦定理 - (2016/01/30 (土) 17:16:22) の最新版との変更点

追加された行は緑色になります。

削除された行は赤色になります。

余弦定理の証明に使う図をつくる

&ref(cosine_rule.png,,title=,width=400,)
&ref(cosine_rule.cdy)

・画面に幾何点A, B, Cをとる

Putpoint("H",[C.x,0]);
／／ CからABに下ろした点Hを幾何点にとる
Listplot([A,B,C,A]);
Listplot([C,H]);
Listplot([A,H]);
Listplot([B,H]);
Paramark([C,H,A]);
／／ 垂直のマークをつける
Bowdata([B,C],[1,1.2,"Expr=a","dr,0.5"]); 
Bowdata([C,A],[1,1.2,"Expr=b","dr,0.5"]); 
Bowdata([A,B],[1,1.2,"Expr=c","dr,0.5"]); 
／／ 弓を描いて中央に文字を書き入れる
Letter([A,"s1w1","A",B,"s1e1","B"]);
Letter([C,"n2","C",H,"n1e1","H"]);

余弦定理　16.01.30　cosine_rule.cdy

&ref(cosine_rule.png,,title=,width=400,)
&ref(cosine_rule.zip)

余弦定理の証明に使う図をつくる

・画面に幾何点A, B, Cをとる

Putpoint("H",[C.x,0]);
／／ CからABに下ろした点Hを幾何点にとる
Listplot([A,B,C,A]);
Listplot([C,H]);
Listplot([A,H]);
Listplot([B,H]);

Paramark([C,H,A]);
／／ 垂直のマークをつける
Bowdata([B,C],[1,1.2,"Expr=a","dr,0.5"]); 
Bowdata([C,A],[1,1.2,"Expr=b","dr,0.5"]); 
Bowdata([A,B],[1,1.2,"Expr=c","dr,0.5"]); 
／／ 弓を描いて中央に文字を書き入れる
Letter([A,"s1w1","A",B,"s1e1","B"]);
Letter([C,"n2","C",H,"n1e1","H"]);