Доброго времени!
Как правильно создать условие, что бы сначала перебирались цифры по одной от 1 до n и от n до 1 бесконечно. например от 1 до 5: 123454321.
Как правильно создать условие, что бы сначала перебирались цифры по одной от 1 до n и от n до 1 бесконечно. например от 1 до 5: 123454321.
Код:
While 1
For $i = 1 To 10
$y =- $i
If $y <> 10 Then
MsgBox(0, "1", $i & ' ' & $y)
;~ Else
;~ For $y = 10 To 1
;~ MsgBox(0, "2", $y)
;~ Next
;~ ($y - $i)
EndIf
Next
;~ Sleep(200)
WEnd