Funkcija Round() , Accessova greška ili ?????

[ Trtko @ 17.07.2009. 11:24 ] @

E sad ne znam jel sam ja pobenavio i moji kompovi ili je to nešto drugo

Dim aa, bb As Double

aa = 521.5
MsgBox Round(aa, 0) ' rezultat 522

bb = 522.5
MsgBox Round(bb, 0) ' rezultat 522 a trebalo bi biti 523

jel i kod vas to tako radi ili samo kod mene , Getsbi, Zidar, Nikola i ostali znanci u čemu je tu štos

[ captPicard @ 17.07.2009. 11:45 ] @

Citat:

Trtko: E sad ne znam jel sam ja pobenavio i moji kompovi ili je to nešto drugo

Dim aa, bb As Double

aa = 521.5
MsgBox Round(aa, 0) ' rezultat 522

bb = 522.5
MsgBox Round(bb, 0) ' rezultat 522 a trebalo bi biti 523

jel i kod vas to tako radi ili samo kod mene , Getsbi, Zidar, Nikola i ostali znanci u čemu je tu štos

Brojevi se kod Round funkcije zaokruživaju na prvi paran broj, ako se ne varam.

Napiši svoju rutinu za zaokruživanje.

[ Trtko @ 17.07.2009. 12:58 ] @

Hmmmmmmmm tko bi rekao

Čini se da si u pravu, uopšte o tome nisam razmišljao.

[ djoka_l @ 17.07.2009. 13:03 ] @

Broj se zaokružuje na parnu cifru, samo ako je ono što se odbacuje tačno 5. Znači round(522.5,0) = 522, ali round(522.5000001,0) = 523

[ Zidar @ 17.07.2009. 13:20 ] @

Google "Access Rounding error" i svasta se moze videti..... meni se nedavno desilo da kad uradim isto sabiranje preko kverija i to isto preko rekordseta dobijem malkice razlicit rezultat....

:-(

[ domaci_a_nas @ 17.07.2009. 20:16 ] @

Citat:

djoka_l: Broj se zaokružuje na parnu cifru, samo ako je ono što se odbacuje tačno 5. Znači round(522.5,0) = 522, ali round(522.5000001,0) = 523

Ovoga se sećam i iz matematike, čudo kako to nisi znao... Bruko :)

[ Getsbi @ 17.07.2009. 20:59 ] @

Nisam obratio pažnju da sam prozvan. Evo pravila zaokruživanja. Možda će nekome trebati u budućnosti.

[ domaci_a_nas @ 19.07.2009. 23:47 ] @

Evo malo da skrenem sa teme, samo da kažem da mi je ovaj dokument koji je Getsbi postavio pomalo i nelogičan u delu koji govori o sigurnim ciframa. Naime pominje se da je rezultat merenja 2701+-3 i da su sigurne cifre 2, 7 i 0 i da ne zavise od greške. Po meni je samo cifra 2 sigurna, pošto je moguće da rezultat bude i 2698... Ali to je samo moje filozofiranje...

[ izonic @ 23.07.2009. 14:22 ] @

Function Zaokruzi(Vrijednost, BrojDecimala As Integer, NavecuOd As Single)

' Zaokruzivanje broja x na decimale

Dim Faktor As Long
NavecuOd = 1 - (NavecuOd / 10)
Faktor = 10 ^ BrojDecimala
Zaokruzi = Int(Vrijednost * Faktor + NavecuOd) / Faktor
End Function