「楕円」の編集履歴（バックアップ）一覧はこちら

楕円 - (2016/10/30 (日) 12:54:08) の最新版との変更点

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

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

楕円　　　16.01.30　ellipse.cdy

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

Setunitlen("5mm");
／／　単位長を設定して図を小さくする
／／　「円を加える」ボタンを押し，原点(Aになる)でクリックしてから
／／　x軸上の適当なところ(Bになる)までドラッグして離し円を描く
／／　「線分を加える」ボタンを押し，円上(Cになる)でクリックしてから
／／　x軸上までドラッグして離す(Dになる)
Setcolor("navyblue"); 
Circledata([A,B]);
Listplot([C,D]);
Setcolor("black");
／／　色を変えて円と線分を描く
Ellipseplot("1",[[-2.5,0],[2.5,0],6]);
／／　焦点の座標と焦点からの距離の和によって楕円を描く
Letter([B,"n2e","A",B,"s2e","$a$"]);
Letter([F,"n2w","A$^\prime$",F,"s2w","$-a$"]);
Letter([E,"n1w2","$a$",G,"sw2","$-a$"]);
Letter([H,"e","B",H,"w1","$b$"]);
Letter([K,"e","B$^\prime$",K,"w","$-b$"]);
Letter([C,"ne","P",D,"s1","H",M,"ne","Q"]);
／／　座標などを表示する場所の点をとり，表示する

楕円　　　16.01.30　ellipse.cdy

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

Setunitlen("5mm");
／／　単位長を設定して図を小さくする
／／　「円を加える」ボタンを押し，原点(Aになる)でクリックしてから
／／　x軸上の適当なところ(Bになる)までドラッグして離し円を描く
／／　「線分を加える」ボタンを押し，円上(Cになる)でクリックしてから
／／　x軸上までドラッグして離す(Dになる)
Setcolor("navyblue"); 
Circledata([A,B]);
Listplot([C,D]);
Setcolor("black");
／／　色を変えて円と線分を描く
Ellipseplot("1",[[-2.5,0],[2.5,0],6]);
／／　焦点の座標と焦点からの距離の和によって楕円を描く
Letter([B,"n2e","A",B,"s2e","$a$"]);
Letter([F,"n2w","A$^\prime$",F,"s2w","$-a$"]);
Letter([E,"n1w2","$a$",G,"sw2","$-a$"]);
Letter([H,"e","B",H,"w1","$b$"]);
Letter([K,"e","B$^\prime$",K,"w","$-b$"]);
Letter([C,"ne","P",D,"s1","H",M,"ne","Q"]);
／／　座標などを表示する場所の点をとり，表示する