using System;

using System.Linq;

using System.Collections.Generic;

public class Program

{

    public static void Main()

    {

        var servico = new ServicoDeRateio();

        int parcelas = 6;

        var items = servico.Ratear(10M, 6, PoliticaArredondamentoRateio.DoisDecimais);

        items.Dump();

        //IEnumerable<decimal> l = new[]{ 0.03M, 0.01M, 0.02M };

        //l = l.OrderBy(v => v * -1);

        //l.Dump();

    }

    public enum PoliticaArredondamentoRateio

    {

        DoisDecimais,

        QuatroDecimais

    }

    public class ServicoDeRateio

    {

        public IEnumerable<decimal> ArredondarTotalRateado(IEnumerable<decimal> valoresRateados, decimal valorTotalParaRatear, PoliticaArredondamentoRateio politicaDeArredondamento)

        {

            decimal fator = Fator(politicaDeArredondamento);

            var valores = valoresRateados.ToList();

​

            if (valores.Any())

            {

                var indicesOrdenadosPelosDecimaisRestantes = new List<KeyValuePair<int, decimal>>();

                for (var i = 0; i < valores.Count; i++)

                {

                    indicesOrdenadosPelosDecimaisRestantes.Add(new KeyValuePair<int, decimal>(i, valores[i] * fator - Math.Floor(valores[i] * fator)));

​

                    valores[i] = this.ArredondarValor(valores[i], politicaDeArredondamento);

                }

​

                // Ordena valores pelos decimais não truncados

                indicesOrdenadosPelosDecimaisRestantes = indicesOrdenadosPelosDecimaisRestantes.OrderByDescending(p => p.Value).ToList();

​

                decimal totalJaRateado = valores.Sum();

​

                decimal diferenca = valorTotalParaRatear - totalJaRateado;

​

                while (diferenca != 0)

                {

                    decimal valor = 0;

                    if (diferenca > 0)

                    {

                        valor = 1 / fator;

                        diferenca -= valor;

                        valores[indicesOrdenadosPelosDecimaisRestantes.OrderByDescending(w => w.Value).FirstOrDefault().Key] += valor;

                    }

                    else

                    {

                        valor =  -1 / fator;

                        diferenca += valor * -1;

                        valores[indicesOrdenadosPelosDecimaisRestantes.OrderBy(w => w.Value).FirstOrDefault().Key] += valor;

                    }

                }

            }

​

            return valores;

        }

​

        public decimal ArredondarValor(decimal valor, PoliticaArredondamentoRateio politicaDeArredondamento)

        {

            decimal fator = Fator(politicaDeArredondamento);

            return decimal.Truncate(valor * fator) / fator;

        }

​

        public decimal Fator(PoliticaArredondamentoRateio politicaDeArredondamento)

        {

            int i = 0;

​

            switch (politicaDeArredondamento)

            {

                case PoliticaArredondamentoRateio.DoisDecimais:

                    i = 2;

                    break;

                case PoliticaArredondamentoRateio.QuatroDecimais:

                    i = 4;

                    break;

            }

​

            return (int)Math.Floor(Math.Pow(10, i));

        }

​

        #region Funções de rateio

​

        public IEnumerable<decimal> Ratear<T>(decimal valorTotalParaRatear, IEnumerable<T> listaDeItens, Func<T, decimal> valorDeUmItem, PoliticaArredondamentoRateio politicaDeArredondamento)

        {

            decimal total = listaDeItens.Sum(valorDeUmItem);

​

            IList<decimal> listaDeRateios = new List<decimal>();

​

            foreach (var item in listaDeItens)

            {

                var valor = valorDeUmItem.Invoke(item);

​

                decimal valorRateado = (total * valor) == 0 ? 0 : valorTotalParaRatear / total * valor;

​

                listaDeRateios.Add(valorRateado);

            }

​

            listaDeRateios = this.ArredondarTotalRateado(listaDeRateios, valorTotalParaRatear, politicaDeArredondamento).ToList();

​

            return listaDeRateios.AsEnumerable();

        }

​

        public IEnumerable<decimal> Ratear<T>(decimal valorTotalParaRatear, IEnumerable<T> listaDeItens, Func<T, decimal> valorDeUmItem, PoliticaArredondamentoRateio politicaDeArredondamento, Action<T, decimal> atualizarListaAplicandoRateio)

        {

            var rateio = Ratear(valorTotalParaRatear, listaDeItens, valorDeUmItem, politicaDeArredondamento);

​

            for (var i = 0; i < rateio.Count(); i++)

            {

                var valorRateado = rateio.ElementAt(i);

                var item = listaDeItens.ElementAt(i);

​

                atualizarListaAplicandoRateio(item, valorRateado);

            }

​

            return rateio;

        }

​

        public IEnumerable<decimal> Ratear(decimal valorTotalParaRatear, int quantidadeDeParcelas, PoliticaArredondamentoRateio politicaDeArredondamento)

        {

            IList<decimal> retorno = new List<decimal>();

​

            if (valorTotalParaRatear % quantidadeDeParcelas != 0)

            {

                var valorParcela = valorTotalParaRatear / quantidadeDeParcelas;

​

                for (int i = 0; i < quantidadeDeParcelas; i++)

                    retorno.Add(valorParcela);

​

                retorno = this.ArredondarTotalRateado(retorno, valorTotalParaRatear, politicaDeArredondamento).ToList();

            }

            else

            {

                var valorParcela = valorTotalParaRatear / quantidadeDeParcelas;

​

                for (int i = 0; i < quantidadeDeParcelas; i++)

                    retorno.Add(valorParcela);

            }

​

            return retorno.AsEnumerable();

        }

​

        #endregion

​

    }

}