Простейший цикл построен на метках и сильно охаянной команды GoTo
Синтаксис
metka:
...код...
Goto metka
Дойдя до команды Goto, программа перепрыгнет на указанную метку. Цикл, епт...
Цикл For
For i=1 To N Step N
...код...
Endfor
Пример нубкода с циклом For (заполняет экран цветными линиями)
GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.Width = 600
GraphicsWindow.Height =400
For i=1 To 1000
x1=20+Math.GetRandomNumber(560)
x2=20+Math.GetRandomNumber(560)
y1=20+Math.GetRandomNumber(360)
y2=20+Math.GetRandomNumber(360)
GraphicsWindow.PenColor = GraphicsWindow.GetRandomColor()
GraphicsWindow.DrawLine(x1, y1, x2, y2)
EndFor
Цикл While
While (условия)
...код...
EndWhile
Синтаксис
metka:
...код...
Goto metka
Дойдя до команды Goto, программа перепрыгнет на указанную метку. Цикл, епт...
Цикл For
For i=1 To N Step N
...код...
Endfor
Пример нубкода с циклом For (заполняет экран цветными линиями)
GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.Width = 600
GraphicsWindow.Height =400
For i=1 To 1000
x1=20+Math.GetRandomNumber(560)
x2=20+Math.GetRandomNumber(560)
y1=20+Math.GetRandomNumber(360)
y2=20+Math.GetRandomNumber(360)
GraphicsWindow.PenColor = GraphicsWindow.GetRandomColor()
GraphicsWindow.DrawLine(x1, y1, x2, y2)
EndFor
Цикл While
While (условия)
...код...
EndWhile
Комментариев нет:
Отправить комментарий