As respostas obtidas usando a função Round no Delphi às vezes são diferentes do que esperávamos:
O arredondamento é usado para deixar números pares. Ou seja, quando o dígito de arredondamento ou arredondamento é maior ou menor que cinco, é processado por arredondamento. Quando o dígito de arredondamento ou arredondamento é igual a cinco, depende de qual é o dígito anterior. inserido, ele sempre retorna um valor par.
Resultados de exemplo
i:= Rodada (11,5) 12
eu:= Rodada(10,5) 10
Na verdade, esse tipo de rodada é baseada no algoritmo do banqueiro, geralmente usado em estatísticas, e é mais científico do que o "arredondamento" tradicional.
Se quiser usar o método tradicional de "arredondamento", você pode usar a seguinte função:
função RoundClassic (R: Real): Int64;
começar
Resultado:= Trunc(R);
se Frac(R) >= 0,5 então
Resultado:= Resultado + 1;
fim;
Na verdade, esse problema existe em linguagens relacionadas a VB, Excel e .net.