Arrotondamento di un numero con virgola mobile - Cronologia

Vuott il 22:02, 1 lug 2024

2024-07-01T22:02:04Z

← Versione meno recente		Versione delle 16:02, 1 lug 2024
Riga 1:		Riga 1:
	Se vogliamo ottenere un arrotondamento di un numero con la virgola, possiamo utilizzare la funzione ''Round()'' oppure la funzione ''Ceil()''.		Se vogliamo ottenere un arrotondamento di un numero con la virgola, possiamo utilizzare la funzione "Round()" oppure la funzione "Ceil()".

	==Uso della funzione ''Round()''==		==Uso della funzione "Round()"==
	La funzione '''[https://gambaswiki.org/wiki/lang/round?l=it Round()]''' arrotonda un numero al più vicino intero a seconda di alcuni casi.		La funzione '''[https://gambaswiki.org/wiki/lang/round?l=it Round()]''' arrotonda un numero al più vicino intero a seconda di alcuni casi.

Riga 7:		Riga 7:
	Se il primo numero decimale è uguale o supriore a 5, si avrà un arrotondamento all'unità <SPAN Style="text-decoration:underline">''superiore''</span>:		Se il primo numero decimale è uguale o supriore a 5, si avrà un arrotondamento all'unità <SPAN Style="text-decoration:underline">''superiore''</span>:

	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim f As Float		Dim f As Float

	f = <FONT color=~~#B22222~~>Round</font>(87326.5)		f = <FONT color=red>Round</font>(87326.5)

	Print f		Print f

	~~'''~~End~~'''~~		End
	In console avremo:		In console avremo:
	<BR>8732'''7'''		<BR>8732'''7'''

	===Arrotondamento all'unità ''inferiore''===		===Arrotondamento all'unità ''inferiore''===
	Se il primo numero decimale è inferiore a 5, si avrà un arrotondamento all'unità <~~SPAN Style="text-decoration:underline"~~>''inferiore''</~~span~~>:		Se il primo numero decimale è inferiore a 5, si avrà un arrotondamento all'unità <U>''inferiore''</u>:

	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim f As Float		Dim f As Float

	f = <FONT color=~~#B22222~~>Round</font>(87326.4999999)		f = <FONT color=red>Round</font>(87326.4999999)

	Print f		Print f

	~~'''~~End~~'''~~		End
	In console avremo:		In console avremo:
	<BR>8732'''6'''		<BR>8732'''6'''
Riga 37:		Riga 37:
	==Uso della funzione "Ceil()"==		==Uso della funzione "Ceil()"==
	E', poi, possibile molto semplicemente utilizzare anche la funzione aritmetica '''[https://gambaswiki.org/wiki/lang/ceil?l=it Ceil()]''': se il numero è <SPAN style="text-decoration:underline">positivo</span> e contiene dei decimali, allora tale funzione restituirà un numero arrotondato all'unità intera superiore.		E', poi, possibile molto semplicemente utilizzare anche la funzione aritmetica '''[https://gambaswiki.org/wiki/lang/ceil?l=it Ceil()]''': se il numero è <SPAN style="text-decoration:underline">positivo</span> e contiene dei decimali, allora tale funzione restituirà un numero arrotondato all'unità intera superiore.
	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Print <FONT color=~~B22222~~>Ceil</font>(1.49)		Print <FONT color=red>Ceil</font>(1.49)

	~~'''~~End~~'''~~		End
	in console si avrà il risultato:		in console si avrà il risultato:
	<BR>2		<BR>2
Riga 50:		Riga 50:

	Mostriamo un esempio, nel quale il valore sarà arrotondato all'unità superiore, qualora il decimale a destra della virgola sia almeno pari a .5:		Mostriamo un esempio, nel quale il valore sarà arrotondato all'unità superiore, qualora il decimale a destra della virgola sia almeno pari a .5:
	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim f As Float = 4.543		Dim f As Float = 4.543
Riga 59:		Riga 59:
	Print i		Print i

	~~'''~~End~~'''~~		End


Riga 78:		Riga 78:


	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim f As Float		Dim f As Float
Riga 85:		Riga 85:
	Print f		Print f

	~~'''~~End~~'''~~		End

	===Uso della funzione esterna "round()"===		===Uso della funzione esterna "round()"===
Riga 100:		Riga 100:


	~~'''~~Public~~'''~~ Sub Main()		Public Sub Main()

	Dim f As Float		Dim f As Float

	f = round_C(1.49)		f = round_C(1.49)
Riga 110:		Riga 110:
	Print f		Print f

	~~'''~~End~~'''~~		End

Vuott il 14:39, 1 giu 2023

2023-06-01T14:39:13Z

← Versione meno recente		Versione delle 08:39, 1 giu 2023
Riga 2:		Riga 2:

	==Uso della funzione ''Round()''==		==Uso della funzione ''Round()''==
	La funzione '''[~~http~~://~~www.gambas-it~~.org/wiki/~~index.php~~?~~title~~=~~Round~~ Round()]''' arrotonda un numero al più vicino intero a seconda di alcuni casi.		La funzione '''[https://gambaswiki.org/wiki/lang/round?l=it Round()]''' arrotonda un numero al più vicino intero a seconda di alcuni casi.

	===Arrotondamento all'unità ''superiore''===		===Arrotondamento all'unità ''superiore''===
Riga 36:		Riga 36:

	==Uso della funzione "Ceil()"==		==Uso della funzione "Ceil()"==
	E', poi, possibile molto semplicemente utilizzare anche la funzione aritmetica "Ceil()": se il numero è <SPAN style="text-decoration:underline">positivo</span> e contiene dei decimali, allora tale funzione restituirà un numero arrotondato all'unità intera superiore.		E', poi, possibile molto semplicemente utilizzare anche la funzione aritmetica '''[https://gambaswiki.org/wiki/lang/ceil?l=it Ceil()]''': se il numero è <SPAN style="text-decoration:underline">positivo</span> e contiene dei decimali, allora tale funzione restituirà un numero arrotondato all'unità intera superiore.
	'''Public''' Sub Main()		'''Public''' Sub Main()

Riga 47:		Riga 47:

	==Arrotondamento senza funzioni specifiche di arrotondamento==		==Arrotondamento senza funzioni specifiche di arrotondamento==
	E' possibile effettuare l'arrotondamento senza alcuna funzione appositamente dedicata all'arrotondamento, ma solo utilizzando la funzione ''Fix()'' per eliminare la parte decimale.		E' possibile effettuare l'arrotondamento senza alcuna funzione appositamente dedicata all'arrotondamento, ma solo utilizzando la funzione "[https://gambaswiki.org/wiki/lang/fix?l=it Fix()]" per eliminare la parte decimale.

	Mostriamo un esempio, nel quale il valore sarà arrotondato all'unità superiore, qualora il decimale a destra della virgola sia almeno pari a .5:		Mostriamo un esempio, nel quale il valore sarà arrotondato all'unità superiore, qualora il decimale a destra della virgola sia almeno pari a .5:

Vuott il 14:34, 1 giu 2023

2023-06-01T14:34:52Z

← Versione meno recente		Versione delle 08:34, 1 giu 2023
Riga 1:		Riga 1:
	Se vogliamo ottenere un arrotondamento di un numero con la virgola, possiamo utilizzare la funzione ''Round()'' oppure la funzione ''Ceil()''.		Se vogliamo ottenere un arrotondamento di un numero con la virgola, possiamo utilizzare la funzione ''Round()'' oppure la funzione ''Ceil()''.



	==Uso della funzione ''Round()''==		==Uso della funzione ''Round()''==
	La funzione '''[http://www.gambas-it.org/wiki/index.php?title=Round Round()]''' arrotonda un numero al più vicino intero a seconda di alcuni casi.		La funzione '''[http://www.gambas-it.org/wiki/index.php?title=Round Round()]''' arrotonda un numero al più vicino intero a seconda di alcuni casi.


	===Arrotondamento all'unità ''superiore''===		===Arrotondamento all'unità ''superiore''===
Riga 14:		Riga 11:
	Dim f As Float		Dim f As Float

	f = <FONT color=#B22222>Round</font>(87326.5)		f = <FONT color=#B22222>Round</font>(87326.5)

	Print f		Print f

	'''End'''		'''End'''

	In console avremo:		In console avremo:
	<BR>8732'''7'''		<BR>8732'''7'''


	===Arrotondamento all'unità ''inferiore''===		===Arrotondamento all'unità ''inferiore''===
Riga 31:		Riga 26:
	Dim f As Float		Dim f As Float

	f = <FONT color=#B22222>Round</font>(87326.4999999)		f = <FONT color=#B22222>Round</font>(87326.4999999)

	Print f		Print f

	'''End'''		'''End'''

	In console avremo:		In console avremo:
	<BR>8732'''6'''		<BR>8732'''6'''


			==Uso della funzione "Ceil()"==
	==Uso della funzione ''Ceil()''==		E', poi, possibile molto semplicemente utilizzare anche la funzione aritmetica "Ceil()": se il numero è <SPAN style="text-decoration:underline">positivo</span> e contiene dei decimali, allora tale funzione restituirà un numero arrotondato all'unità intera superiore.
	E', poi, possibile molto semplicemente utilizzare anche la funzione aritmetica ~~'''~~Ceil()~~'''~~: se il numero è <SPAN style="text-decoration:underline">positivo</span> e contiene dei decimali, allora tale funzione restituirà un numero arrotondato all'unità intera superiore.
	'''Public''' Sub Main()		'''Public''' Sub Main()

Riga 51:		Riga 44:
	in console si avrà il risultato:		in console si avrà il risultato:
	<BR>2		<BR>2



Riga 63:		Riga 55:
	Dim i As Integer		Dim i As Integer

	i = Fix(f + 0.5)		i = Fix(f + 0.5)

	Print i		Print i

	'''End'''		'''End'''
Riga 73:		Riga 65:
	E' possibile, volendo, utilizzare alcune funzioni esterne appartenenti alla libreria ''libm.so.6''.		E' possibile, volendo, utilizzare alcune funzioni esterne appartenenti alla libreria ''libm.so.6''.

	===Uso della funzione esterna ''ceil( )''===		===Uso della funzione esterna "ceil()"===
	La funzione esterna ''ceil( )'' restituisce il più piccolo valore integrale non inferiore a X. Il suo comportamento è identico a quello della funzione nativa di Gambas ''Ceil( )~~''.~~		La funzione esterna "ceil()" restituisce il più piccolo valore integrale non inferiore a X. Il suo comportamento è identico a quello della funzione nativa di Gambas "Ceil()".

	Poiché il suo nome è analogo al nome della funzione ''Ceil( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.

			Poiché il suo nome è analogo al nome della funzione "Ceil()" nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome. <SUP>[[[#Note\|nota1]]]</sup>

	Mostriamo un esempio pratico:		Mostriamo un esempio pratico:
Riga 91:		Riga 82:
	Dim f As Float		Dim f As Float

	f = ceil_C(1.49)		f = ceil_C(1.49)
	Print f		Print f

	'''End'''		'''End'''

			===Uso della funzione esterna "round()"===
			La funzione esterna "round()" arrotonda un numero in virgola mobile al valore integrale più vicino.

	~~===Uso della funzione esterna ''round( )''===~~		Poiché il suo nome è analogo al nome della funzione "Round()" nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.
	~~La funzione esterna ''round( )'' arrotonda un numero in virgola mobile al valore integrale più vicino.~~

	Poiché il suo nome è analogo al nome della funzione ''Round( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.


	Mostriamo un esempio pratico:		Mostriamo un esempio pratico:
Riga 115:		Riga 104:
	Dim f As Float		Dim f As Float

	f = round_C(1.49)		f = round_C(1.49)
	Print f		Print f

	f = round_C(1.5)		f = round_C(1.5)
	Print f		Print f

	'''End'''		'''End'''



			=Note=
			[1] Al riguardo vedere anche la seguente pagina:
			<BR>https://www.gambas-it.org/wiki/index.php/Extern:_richiamare_funzioni_esterne_a_Gambas#Uso_del_nome_di_una_funzione_gi.C3.A0_utilizzato_da_Gambas

Vuott il 09:54, 23 set 2016

2016-09-23T09:54:19Z

← Versione meno recente		Versione delle 03:54, 23 set 2016
Riga 82:		Riga 82:
	Library "libm:6"		Library "libm:6"

	<FONT Color=gray> ' ''ceil (_Mdouble_ __x)''		<FONT Color=gray>' ''ceil (_Mdouble_ __x)''
	' ''Smallest integral value not less than X.''</font>		' ''Smallest integral value not less than X.''</font>
	Private Extern ceil_C(__x As Float) As Float Exec "ceil"		Private Extern ceil_C(__x As Float) As Float Exec "ceil"
Riga 106:		Riga 106:
	Library "libm:6"		Library "libm:6"

	<FONT Color=gray> ' ''round (_Mdouble_ __x)''		<FONT Color=gray>' ''round (_Mdouble_ __x)''
	' ''Round X to nearest integral value, rounding halfway cases away from zero.''</font>		' ''Round X to nearest integral value, rounding halfway cases away from zero.''</font>
	Private Extern round_C(__x As Float) As Float Exec "round"		Private Extern round_C(__x As Float) As Float Exec "round"

Vuott il 09:50, 23 set 2016

2016-09-23T09:50:49Z

← Versione meno recente		Versione delle 03:50, 23 set 2016
Riga 72:		Riga 72:
	==Uso delle funzioni esterne della libreria ''libm.so.6''==		==Uso delle funzioni esterne della libreria ''libm.so.6''==
	E' possibile, volendo, utilizzare alcune funzioni esterne appartenenti alla libreria ''libm.so.6''.		E' possibile, volendo, utilizzare alcune funzioni esterne appartenenti alla libreria ''libm.so.6''.


	===Uso della funzione esterna ''ceil( )''===		===Uso della funzione esterna ''ceil( )''===
Riga 101:		Riga 100:
	La funzione esterna ''round( )'' arrotonda un numero in virgola mobile al valore integrale più vicino.		La funzione esterna ''round( )'' arrotonda un numero in virgola mobile al valore integrale più vicino.

	Poiché il suo nome è analogo al nome della funzione ''~~round~~( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.		Poiché il suo nome è analogo al nome della funzione ''Round( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.

Vuott il 09:49, 23 set 2016

2016-09-23T09:49:47Z

← Versione meno recente		Versione delle 03:49, 23 set 2016
Riga 99:		Riga 99:

	===Uso della funzione esterna ''round( )''===		===Uso della funzione esterna ''round( )''===
	La funzione esterna ''~~ceil~~( )'' arrotonda un numero in virgola mobile al valore integrale più vicino.		La funzione esterna ''round( )'' arrotonda un numero in virgola mobile al valore integrale più vicino.

	Poiché il suo nome è analogo al nome della funzione ''round( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.		Poiché il suo nome è analogo al nome della funzione ''round( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.

Vuott il 09:49, 23 set 2016

2016-09-23T09:49:12Z

← Versione meno recente		Versione delle 03:49, 23 set 2016
Riga 67:		Riga 67:
	Print i		Print i

			'''End'''


			==Uso delle funzioni esterne della libreria ''libm.so.6''==
			E' possibile, volendo, utilizzare alcune funzioni esterne appartenenti alla libreria ''libm.so.6''.


			===Uso della funzione esterna ''ceil( )''===
			La funzione esterna ''ceil( )'' restituisce il più piccolo valore integrale non inferiore a X. Il suo comportamento è identico a quello della funzione nativa di Gambas ''Ceil( )''.

			Poiché il suo nome è analogo al nome della funzione ''Ceil( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.


			Mostriamo un esempio pratico:
			Library "libm:6"

			<FONT Color=gray> ' ''ceil (_Mdouble_ __x)''
			' ''Smallest integral value not less than X.''</font>
			Private Extern ceil_C(__x As Float) As Float Exec "ceil"


			'''Public''' Sub Main()

			Dim f As Float

			f = ceil_C(1.49)
			Print f

			'''End'''


			===Uso della funzione esterna ''round( )''===
			La funzione esterna ''ceil( )'' arrotonda un numero in virgola mobile al valore integrale più vicino.

			Poiché il suo nome è analogo al nome della funzione ''round( )'' nativa di Gambas, sarà necessario utilizzare per la funzione esterna un nome fittizio, e richiamare poi con ''Exec'' nella definizione in ''Extern'' il suo vero nome.


			Mostriamo un esempio pratico:
			Library "libm:6"

			<FONT Color=gray> ' ''round (_Mdouble_ __x)''
			' ''Round X to nearest integral value, rounding halfway cases away from zero.''</font>
			Private Extern round_C(__x As Float) As Float Exec "round"


			'''Public''' Sub Main()

			Dim f As Float

			f = round_C(1.49)
			Print f

			f = round_C(1.5)
			Print f

	'''End'''		'''End'''

Vuott il 00:02, 22 feb 2016

2016-02-22T00:02:40Z

← Versione meno recente		Versione delle 18:02, 21 feb 2016
Riga 54:		Riga 54:


	==Arrotondamento senza funzioni specifiche==		==Arrotondamento senza funzioni specifiche di arrotondamento==
	E' possibile effettuare l'arrotondamento senza alcuna funzione, ~~come in questo~~ esempio:		E' possibile effettuare l'arrotondamento senza alcuna funzione appositamente dedicata all'arrotondamento, ma solo utilizzando la funzione ''Fix()'' per eliminare la parte decimale.

			Mostriamo un esempio, nel quale il valore sarà arrotondato all'unità superiore, qualora il decimale a destra della virgola sia almeno pari a .5:
	'''Public''' Sub Main()		'''Public''' Sub Main()

	Dim a As Float = 26.~~123~~		Dim f As Float = 4.543
			Dim i As Integer

			i = Fix(f + 0.5)

	~~<FONT Color=gray>' ''Arrotondamento all'unità superiore <SPAN Style="text-decoration:underline">se</span> ci sono dei decimali:''</font>~~		Print i
	~~If a > Fix(a) Then a = Fix(a) + 1~~

	Print ~~"a = "; a~~

	'''End'''		'''End'''

	~~In console avremo:~~
	~~<BR>a = 27~~

Vuott il 11:19, 13 ott 2015

2015-10-13T11:19:32Z

← Versione meno recente		Versione delle 05:19, 13 ott 2015
Riga 55:		Riga 55:

	==Arrotondamento senza funzioni specifiche==		==Arrotondamento senza funzioni specifiche==
	E' possibile effettuare l'arrotondamento senza alcuna funzione, ~~anche escogitando qualcosa~~ come questo esempio:		E' possibile effettuare l'arrotondamento senza alcuna funzione, come in questo esempio:
	'''Public''' Sub ~~Button1_Click~~()		'''Public''' Sub Main()

	Dim a~~, b~~ As Float = 26.123		Dim a As Float = 26.123

	''<FONT Color=gray>'Arrotondamento all'unità <SPAN Style="text-decoration:underline">~~superiore~~</span>:''</font>		<FONT Color=gray>' ''Arrotondamento all'unità superiore <SPAN Style="text-decoration:underline">se</span> ci sono dei decimali:''</font>
	a = Fix(a ~~+ 1~~) ~~<FONT Color=gray>' ''...oppure così: ''~~a = Fix(a) + 1~~'' , il risultato è identico.''</font>~~		If a > Fix(a) Then a = Fix(a) + 1

	~~Print "a = "; a~~


	~~<FONT Color=gray>' ''Arrotondamento all'unità <SPAN Style="text-decoration:underline">inferiore</span>:''</font>~~
	~~b = Fix(b - 1) <FONT Color=gray>' ''...oppure così: ''b = Fix(b) - 1'' , il risultato è identico.''</font>~~

	~~Print "b = "; b~~

			Print "a = "; a

	'''End'''		'''End'''

	In console avremo:		In console avremo:
	<BR>a = 27		<BR>a = 27
	~~<BR>b = 25~~

Vuott il 18:29, 28 ott 2014

2014-10-28T18:29:42Z

← Versione meno recente		Versione delle 12:29, 28 ott 2014
Riga 12:		Riga 12:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Dim a As Float		Dim f As Float

	~~Print~~ <FONT color=#B22222>Round</font>(87326.5)		f = <FONT color=#B22222>Round</font>(87326.5)

			Print f

	'''End'''		'''End'''
Riga 27:		Riga 29:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Dim a As Float		Dim f As Float

	a = 87326.4999999		f = <FONT color=#B22222>Round</font>(87326.4999999)

	Print ~~<FONT color=#B22222>Round</font>(87326.4999999)~~		Print f

	'''End'''		'''End'''