? 8160, RoundUp(8160, -1) ? 8161, RoundUp(8161, -1) ? -8160, RoundUp(-8160, -1) ? -8161, RoundUp(-8161, -1) ? 1.4, RoundUp(1.4, 1) ? 1.4, RoundUp(1.4, 0) ? 1.4, RoundUp(1.4, -1) ? 1.7, RoundUp(1.7, 2) ? 1.7, RoundUp(1.7, 1) ? 1.7, RoundUp(1.7, 0) ? 1.7, RoundUp(1.7, -1) ? 1.7, RoundUp(1.7, -2) ? 1.711, RoundUp(1.711, 2) ? 1.71, RoundUp(1.71, 2) ? 1.71, RoundUp(1.71, 1) ? 1.71, RoundUp(1.71, 0) ? 1.71, RoundUp(1.71, -1) ? 1.71, RoundUp(1.71, -2) function RoundUp(n, ndecimal) return round(m.n + sign(m.n) * iif(empty(mod(m.n, 10^(-m.ndecimal))), 0, 10^(-m.ndecimal)/2), m.ndecimal) endfunc
>CLEAR > >FOR i=8359 TO 8371 > ? i, RoundupTo10(i) >ENDFOR > >FUNCTION RoundupTo10(tnValue) >RETURN ROUND(tnValue + 4.9,-1) >>