PureBasic - форум

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.

Вы здесь » PureBasic - форум » Вопросы по PureBasic » step в цикле for

step в цикле for

Страница: 1

Сообщений 1 страница 12 из 12

1

  • Автор: amer
  • Активный участник
  • Зарегистрирован: 26.02.2016
  • Приглашений: 0
  • Сообщений: 32
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    2 дня 20 часов
  • Последний визит:
    03.10.2025 14:15:24

Приветствую всех!
вопрос такой:

Код:
      If REVERS = #PB_MessageRequester_Yes
        x=max: y=min: s=-1
      Else
        x=min: y=max: s=1
      EndIf
      For i = x To y Step s      
        t$ = "L"+Str(i) + ".xml"
        If FileSize(tmpDir$ + t$)>0
          FileNameAdd$ = tmpDir$ + t$
          AddOK = #False
          ThreadID=CreateThread(@addSchet(), x)
        EndIf
      Next i

ругается на step, я так понимаю он должен быть константой...
а каким образом можно это обойти?

Отредактировано amer (27.12.2023 10:28:17)

0

2

  • Автор: useful
  • Активный участник
  • useful
  • Зарегистрирован: 01.08.2020
  • Приглашений: 0
  • Сообщений: 221
  • Уважение: [+4/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    9 дней 11 часов
  • Последний визит:
    18.10.2025 18:12:26

https://www.purebasic.com/documentation … until.html
https://www.purebasic.com/documentation … _wend.html
И самому управлять переменными, шагами приращения и условиями выхода из цикла.

И даже goto в помощь.  :cool:  https://www.purebasic.com/documentation … thers.html

0

3

  • Автор: Wormgrinder
  • Новичок
  • Wormgrinder
  • Зарегистрирован: 11.12.2023
  • Приглашений: 0
  • Сообщений: 5
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    7 часов 54 минуты
  • Последний визит:
    16.02.2024 21:18:56
Код:
For i = x To y Step s      
Next

Это же по сути то же, что и:

Код:
i = x

Repeat
  i + s
Until i >= y

Не?

0

4

  • Автор: Smitis
  • Активный участник
  • Smitis
  • Откуда: Санкт-Петербург
  • Зарегистрирован: 30.08.2020
  • Приглашений: 0
  • Сообщений: 329
  • Уважение: [+3/-0]
  • Позитив: [+1/-2]
  • Пол: Мужской
  • Провел на форуме:
    3 дня 12 часов
  • Последний визит:
    20.10.2025 08:52:06
Wormgrinder написал(а):

Это же по сути то же, что и:

Нет, через Until то же не получится. Через While.

0

5

  • Автор: AZJIO
  • Активный участник
  • Зарегистрирован: 07.08.2020
  • Приглашений: 0
  • Сообщений: 1347
  • Уважение: [+20/-0]
  • Позитив: [+15/-0]
  • Провел на форуме:
    27 дней 16 часов
  • Последний визит:
    Вчера 20:05:09
Код:
max = 4
min = 2
If REVERS = #PB_MessageRequester_Yes
	x = max: y = min: s =  -1
Else
	x = min: y = max: s = 1
EndIf
If s = 1
	For i = x To y Step 1
    Debug i
	Next i
ElseIf s = -1
	For i = x To y Step -1
    Debug i
	Next i
EndIf

0

6

  • Автор: amer
  • Активный участник
  • Зарегистрирован: 26.02.2016
  • Приглашений: 0
  • Сообщений: 32
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    2 дня 20 часов
  • Последний визит:
    03.10.2025 14:15:24

это понятно, что можно воспользоваться другими циклами или самому их "изобрести" но суть была в сокращении кода. короче, непонятно почему step должен быть константой...

0

7

  • Автор: useful
  • Активный участник
  • useful
  • Зарегистрирован: 01.08.2020
  • Приглашений: 0
  • Сообщений: 221
  • Уважение: [+4/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    9 дней 11 часов
  • Последний визит:
    18.10.2025 18:12:26

https://www.purebasic.com/documentation … _next.html
Потому что автор так решил и конкретно отразил своё решение в документации.
И вопрос и обсуждение, исходя из этого, выглядят странно.
Не запрещено предложить ему изменить своё решение.

Отредактировано useful (27.12.2023 16:33:33)

0

8

  • Автор: AZJIO
  • Активный участник
  • Зарегистрирован: 07.08.2020
  • Приглашений: 0
  • Сообщений: 1347
  • Уважение: [+20/-0]
  • Позитив: [+15/-0]
  • Провел на форуме:
    27 дней 16 часов
  • Последний визит:
    Вчера 20:05:09
Smitis написал(а):

Нет, через Until то же не получится. Через While.

Почему нет? Разница между ними только в том, что While может не сделать ни одного шага, а Until сделает один шаг цикла в любом случае. В этом плане While более точный, так как For тоже может не сделать ни одного шага, так как условие проверяется до начала выполнения шага цикла.

0

9

  • Автор: Smitis
  • Активный участник
  • Smitis
  • Откуда: Санкт-Петербург
  • Зарегистрирован: 30.08.2020
  • Приглашений: 0
  • Сообщений: 329
  • Уважение: [+3/-0]
  • Позитив: [+1/-2]
  • Пол: Мужской
  • Провел на форуме:
    3 дня 12 часов
  • Последний визит:
    20.10.2025 08:52:06

AZJIO

Почему нет? Разница между ними только в том, что While может не сделать ни одного шага, а Until сделает один шаг цикла в любом случае.

речь шла "Это же по сути то же"

В этом плане While более точный, так как For тоже может не сделать ни одного шага, так как условие проверяется до начала выполнения шага цикла.

Отличие, на самом деле, весьма значительное - выполнение лишней итерации может привести к непредсказуемым результатам. Особенно, если начальное значение вычисляется выражением. От задачи, конечно, зависит.

0

10

  • Автор: AZJIO
  • Активный участник
  • Зарегистрирован: 07.08.2020
  • Приглашений: 0
  • Сообщений: 1347
  • Уважение: [+20/-0]
  • Позитив: [+15/-0]
  • Провел на форуме:
    27 дней 16 часов
  • Последний визит:
    Вчера 20:05:09

Smitis
Формулировка неточная. Если бы речь шла о Forever, тогда можно было бы сказать как "не получится", потому что оба ключевые слова не имеют условий, хотя даже при этом можно использовать внутреннее условие if + Break, но тут вопрос оптимальности. То есть в любом случае получится.

0

11

  • Автор: Smitis
  • Активный участник
  • Smitis
  • Откуда: Санкт-Петербург
  • Зарегистрирован: 30.08.2020
  • Приглашений: 0
  • Сообщений: 329
  • Уважение: [+3/-0]
  • Позитив: [+1/-2]
  • Пол: Мужской
  • Провел на форуме:
    3 дня 12 часов
  • Последний визит:
    20.10.2025 08:52:06
AZJIO написал(а):

но тут вопрос оптимальности

Ага, через until тоже получится, если добавить в начало цикла проверку начального условия и выход через break.
А можно даже через select (с goto) сделать. Будет красиво, но глупо :)
Но если вернуться к "сути", то по этой самой сути for это синтаксический сахар для while и работает так же.

Отредактировано Smitis (28.12.2023 10:02:33)

0

12

  • Автор: Замабувараев
  • Активный участник
  • Зарегистрирован: 30.04.2023
  • Приглашений: 0
  • Сообщений: 62
  • Уважение: [+1/-1]
  • Позитив: [+0/-0]
  • Провел на форуме:
    19 часов 28 минут
  • Последний визит:
    19.04.2025 14:07:09

Нет никаких причин делать выражение в Step константой. Никаких технических ограничений нет. В VB6 можно в Step указывать даже дробные числа.
Поэтому такие ограничения — просто непродуманный дизайн языка. Ошибка планирования.

0

Страница: 1

Вы здесь » PureBasic - форум » Вопросы по PureBasic » step в цикле for