Scambiare i rispettivi valori fra due variabili

Da Gambas-it.org - Wikipedia.
Versione del 28 lug 2023 alle 16:06 di Vuott (Discussione | contributi) (Creata pagina con "Per scambiare i rispettivi valori fra due variabili (in modo tale l'una acquisti il valore dell'altra) <SPAN Style="text-decoration:underline">senza l'uso di una terza variabi...")

(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)

Per scambiare i rispettivi valori fra due variabili (in modo tale l'una acquisti il valore dell'altra) senza l'uso di una terza variabile d'appoggio, si adotterà il seguente schema:

x = x + y
y = x - y
x = x - y

Mostriamo un esempio pratico in Gambas:

Public Sub Main()

 Dim x, y As Integer

 x = 1
 y = 1000

 x = x + y
 y = x - y
 x = x - y

 Print "x = "; x
 Print "y = "; y

End

In alternativa è possibile usare anche l'operatore logico "XOR":

x = x Xor y
y = x Xor y
x = x Xor y