像楼梯一样的正方形

Question

您好，我想要一个使用 Small Basic 的关于此模式的示例程序，您需要在此处使用 Turtle。谢谢

所以我这样做作为一个示例，它将打印“*”，我希望使用海龟将星号替换为正方形。这是代码：

For row = 1 To 10

    For column = 1 To row
       TextWindow.Write("*")
    EndFor

TextWindow.WriteLine("")
EndFor

Answer 1

我使用 Small Visual Basic 来创建您所要求的确切形状。 Small Visual Basic 构建在 Small Basic 之上，并进行了许多改进和添加。

结果将是这样的：

这是代码：

N = 10
Turtle.Speed = 50
GraphicsWindow.BrushColor = Colors.Green
While N > 0
   Turtle.X = 50 * (11 - N)
   Turtle.Y = 600
   For Row = 1 To N
      Turtle.CreateFigure()
      For I = 1 To 4
         Turtle.Move(50)
         Turtle.TurnRight()
      Next
      Turtle.FillFigure()
      Turtle.Move(50)
   Next
   N = N - 1       
Wend