余弦定理 16.01.30 cosine_rule.cdy
#ref error :ご指定のファイルが見つかりません。ファイル名を確認して、再度指定してください。 (title=)
cosine_rule.zip
余弦定理の証明に使う図をつくる
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"]);
最終更新:2016年10月30日 12:30