最短路 - KeTCindyによる図入り教材の作成

経路の図を描く．

#ref error ：ご指定のファイルが見つかりません。ファイル名を確認して、再度指定してください。 (title=)

shortest_path.zip

• 画面上に線分と点をとる．

Addax(0);
Pointdata("1",B,["Size=8"]);
Pointdata("2",K,["Size=8"]);
Pointdata("3",Q,["Size=8"]);
／／点を黒丸で描く．
Listplot("1",[A,K,L,B,A]);
Listplot("2",[C,D]);
Listplot("3",[E,F]);
Listplot("4",[G,H]);
Listplot("5",[M,N]);
Listplot("6",[O,P]);
／／経路の線分を描く．
Letter([B,"n1w1","A",K,"s1e1","B",Q,"s1w1","C"]);
／／点の名前を描く．