Turtleグラフィックスの問題

問題7

次のような図を描くプログラムを作成しなさい。

解答例

Sub Line_07()
' ジグザグを描く
Dim angle, length
InitializeTurtleGraphics
angle = 90
length = 50
TGTurn angle / 2
TGMoveL length / 2
TGTurn -angle
TGMoveL length
TGTurn angle
TGMoveL length
TGTurn -angle
TGMoveL length
TGTurn angle
TGMoveL length
End Sub

問題ページへ戻る