Elevamento a potenza: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
Nessun oggetto della modifica |
Nessun oggetto della modifica |
||
| Riga 27: | Riga 27: | ||
While (e) | While (e) | ||
If e And 1 Then | |||
ris = ris * b | |||
e = e - 1 | |||
Endif | |||
b = b * b | |||
e = e / 2 | |||
Wend | Wend | ||
Versione delle 18:15, 12 set 2014
Per effettuare l'elevamento a potenza di un numero, è possibile utilizzare almeno due modalità. |1|
Uso del segno ^
Molto brevemente ed agevolmente si potrà utilizzare il segno ^ , come segue:
Public Sub Main() Dim i As Integer i = 3 ^ 4 Print i End
Uso di un algoritmo
Si potrà utilizzare del codice più complesso. Ad esempio:
Public Sub Main()
Dim b, e As Integer
Dim ris As Integer = 1
b = 3
e = 4
While (e)
If e And 1 Then
ris = ris * b
e = e - 1
Endif
b = b * b
e = e / 2
Wend
Print "Risultato = "; ris
End
Note
[1] In vero, è possibile utilizzare anche la funzione pow() della libreria condivisa esterna libm.so