Что нового

Счётчик с произвольным шагом

Атос

Новичок
Сообщения
85
Репутация
0
Добрый день. Подскажите, а как мне делать счётчик с произвольным шагом.
Допустим, мне надо к 0 прибавлять 25, при следующем цикле к 25 прибавлять 25, при следующем к 50 прибавлять 25 и т.д.

Код:
For $i = 0 To 7
MsgBox(0, "title" & '  ', ($i+25) + 25, 1) 
Next
 

СН3СН2ОН

Знающий
Сообщения
78
Репутация
12
Код:
For $i = 0 To 7 step 25
MsgBox(0, "title" & '  ', $i, 1)
Next

Вместо 25 ставим любое число.
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
СН3СН2ОН
Вы считаете это правильным решением? :shok:
 
Автор
А

Атос

Новичок
Сообщения
85
Репутация
0
Это я виноват. Я неправильно задал пример.
Я уже нашёл решение своей задачи.
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Атос [?]
Вы тут ни при чём, просто СН3СН2ОН привёл не совсем удачный пример.
Код:
ConsoleWrite(StringFormat('Example 1\n'))
$i = 0
Do
   ConsoleWrite(StringFormat('%s', ($i < 275)? $i & ', ' : $i & @CR))
   $i += 25
Until $i = 300

ConsoleWrite(StringFormat('Example 2\n'))
$i = 0
For $j = 0 To 7
   ConsoleWrite(StringFormat('%s', (Not Mod($i, (7*25)))? $i & @CR : $i & ', '))
   $i += 25
Next
 
Верх