Коллективные силы оперативного реагирования

[Хакер]

Коллекти́вные си́лы операти́вного реаги́рования (КСОР) — совместные военные силы стран-участников ОДКБ. Предполагается, что Коллективные силы оперативного реагирования будут в состоянии постоянной готовности для противодействия чрезвычайным ситуациям, а также военной агрессии, терроризму, организованной преступности и наркотрафику.[1] КСОР классифицируются как аналог Варшавского договора, но в «новом» виде и при новой общественно-политической формации.

Но я не об этом.

Как часто за свою практику вам приходилось пользоваться оператором Xor? Шифрование не считаем.

[iGrok]

Ну..
1) Обнуление регистров.
2) Изменение значения флага в битовом поле на противоположное.

Всё. И да, достаточно редко.

[MIT]

3) Обмен значениями двух переменных без использования третьей.

А интересует именно VB`шный Xor или эквиваленты типа ^ тоже?
Хотя в любом случае используется не часто...

[Хакер]

Любой Xor, который оператор. Обнуление регистров не подходит.

3) Обмен значениями двух переменных без использования третьей.

Что, всегда делаешь это Xor-ом?

[SLIM]

Обмен значениями двух переменных без использования третьей.

Это делается or-ом

[MIT]

всегда делаешь это Xor-ом?

Нет, не всегда. В основном, когда надо поменять местами элементы байтового массива.

Это делается or-ом

А как?

[Roman Koff]

В детстве, когда мышку в паскале рисовал поверх графической картинки, а также рамки для выделения фрагментов изображения.

[Twister]

Оригинальное название и вступление. Напоминает старый добрый анекдот

А за этим топиком стоит конкретный вопрос и цель или это просто опрос?

[Хакер]

Or-ом никак не поменять, SLIM сглупил.

Не то, чтобы опрос, просто писал контурообходчик, и когда написал Xor, осознал, что не могу вспомнить, когда я в последний раз использовал его, так сказать, по назначению.

[Antonariy]

Ну например…

Код: Выделить всё

                bIsDateT = IsDate(TemplValue)
                bIsDateP = IsDate(PropValue)
                If IsNumeric(TemplValue) Or bIsDateT Or bIsDateP Then
                    Select Case True
                        Case bIsDateP Xor bIsDateT 'если только одна из строк является датой
                            If TemplValue.ToString = "0" Then
                                tval = ZERO_DATE
                                pval = CDate(PropValue)
                            Else
                                pval = ZERO_DATE
                                tval = CDate(TemplValue)
                            End If
                        Case bIsDateP 'если обе
                            tval = CDate(TemplValue)
                            pval = CDate(PropValue)
                        Case Else
                            If IsDBNull(PropValue) Then pval = 0 Else pval = PropValue
                            tval = CDbl(TemplValue)
                    End Select
                    Select Case Condition
                        Case ARG_EQUAL : CheckCondition = pval = tval
                        Case ARG_NOT : CheckCondition = pval <> tval
                        Case ARG_MORE : CheckCondition = pval > tval
                        Case ARG_MOREEQUAL : CheckCondition = pval >= tval
                        Case ARG_LESS : CheckCondition = pval < tval
                        Case ARG_LESSEQUAL : CheckCondition = pval named <= tval
                    End Select
                Else
                    CheckCondition = VB6.Eqv(Condition = ARG_EQUAL, StrComp(PropValue, Trim(TemplValue), CompareMethod.Text) = 0)
                End If

[SLIM]

Да, SLIM сглупил, это и првада делается xor-ом

[Alec]

Or-ом никак не поменять

Код: Выделить всё

  a = Not (Not (a Or b) Or Not (Not (a) Or Not (b)))
  b = Not (Not (a Or b) Or Not (Not (a) Or Not (b)))
  a = Not (Not (a Or b) Or Not (Not (a) Or Not (b)))


?

[iGrok]

Or-ом никак не поменять

Код: Выделить всё

  a = Not (Not (a Or b) Or Not (Not (a) Or Not (b)))
  b = Not (Not (a Or b) Or Not (Not (a) Or Not (b)))
  a = Not (Not (a Or b) Or Not (Not (a) Or Not (b)))


?

Что "?" ?
А разве ответ на твой "?" не очевиден?
Or != Not + Or