Differenze tra le versioni di "Ottenere la parte intera e quella decimale di un numero in virgola mobile"

Da Gambas-it.org - Wikipedia.
Riga 4: Riga 4:
 
==Ottenere la parte intera==
 
==Ottenere la parte intera==
 
Si potrà ottenere la parte intera di un numero in virgola mobile mediante le seguenti funzioni:
 
Si potrà ottenere la parte intera di un numero in virgola mobile mediante le seguenti funzioni:
* fix();
+
* ''Fix()'';
* Int();
+
* ''Int()'';
* Split();
+
* ''Split()'';
* Scan().
+
* ''Scan()''.
  
 
Esempio pratico:
 
Esempio pratico:
Riga 30: Riga 30:
 
==Ottenere la parte decimale==
 
==Ottenere la parte decimale==
 
Si potrà ottenere la parte intera di un numero in virgola mobile mediante le seguenti funzioni:
 
Si potrà ottenere la parte intera di un numero in virgola mobile mediante le seguenti funzioni:
* Frac();
+
* ''Frac()'';
* Split();
+
* ''Split()'';
* Scan().
+
* ''Scan()''.
  
 
Esempio pratico:
 
Esempio pratico:

Versione delle 09:01, 29 ott 2014

Per estrarre da un numero in virgola mobile sia la parte intera che quella decimale, è possibile adoperare complessivamente almeno 5 modalità.


Ottenere la parte intera

Si potrà ottenere la parte intera di un numero in virgola mobile mediante le seguenti funzioni:

  • Fix();
  • Int();
  • Split();
  • Scan().

Esempio pratico:

Public Sub Main()

' Con la funzione "Fix()":
  Print Fix(5 / 3)
 
' Con la funzione "Int()" (con un numero positivo):
  Print Int(5 / 3)
 
' Con la funzione "Split()":
  Print Val(Split(CStr(5 / 3), ".")[0])
   
' Con la funzione "Scan()":
  Print Scan(CStr(5 / 3), "*.*")[0]

End


Ottenere la parte decimale

Si potrà ottenere la parte intera di un numero in virgola mobile mediante le seguenti funzioni:

  • Frac();
  • Split();
  • Scan().

Esempio pratico:

Public Sub Main()

' Con la funzione "Frac()":
  Print Frac(5 / 3)
  
' Con la funzione "Split()" (viene estratta senza lo zero né la virgola):
  Print Val(Split(CStr(5 / 3), ".")[1])
   
' Con la funzione "Scan()" (viene estratta senza lo zero né la virgola):
  Print Scan(CStr(5 / 3), "*.*")[1]

End