Есть сумма 55801,12 ее нужно правильно распределить между 510000 и 49855,86

почитай про пропорции

копейки как не потерять

в типовых есть процедуры распределить пропорционально

(2) сначала определи сколько первому, остальное отдай последнему

вопрос наверное не правильно поставил, надо из 510000 и  49855,86 забрать чтоб до копеечки

запутался...

Как??

Пример давай с цифрами.
Что такое "правильно"?

Есть сумма 55801,12  и есть две статьи затрат
1статья  = 510000
2статья  = 49855,86
нужно списать с этих статей так чтоб копейки не потерялись

(9) куда списать?

с этих  2-ух статей

как найти сумму списания распределенную пропорционально

(12) пропорционально чему?

55801,12 разбить на 2 чтоб было пропорционально

(14) GOTO(1)

(13) Человеку надо раскидать 55801,12 в процентном соотношении на
1статья  = 510000
2статья  = 49855,86

хм...

всю ветку не читал, про то что готовые процедуры есть в типовых уже было?

(0) Что платишь?

да

(18) Искать дольше.

(20) и?

В общем случае, алгоритм такой - распределяем пропорционально, округляя до копеек, далее считаем копеечную разницу и добавляем-вычитаем к максимальной позиции.

(19) семак ему насыпь

(23) предложение хорошее как воплотить

(19) становись нараздачу

(25) Чересчур толсто. Такие алгоритмы в школе на уроке информатики дети пишут.

(27) надо помочь ему, вдруг у него задача по информатике

статью1/на сумму(статья1+статья2)=доля статьи1

только в качестве доказательства что автор слаб

// Выполняет пропорциональное распределение суммы в соответствии
// с заданными коэффициентами распределения.
//
// Параметры:
//        ИсхСумма   - распределяемая сумма
//        МассивКоэф - массив коэффициентов распределения
//        Точность   - точность округления при распределении. Необязателен.
//
//    Возврат:
//        МассивСумм - массив размерностью равный массиву коэффициентов, содержит
//            суммы в соответствии с весом коэффициента (из массива коэффициентов)
//          В случае если распределить не удалось (сумма = 0, кол-во коэф. = 0,
//          или суммарный вес коэф. = 0), тогда возвращается значение Неопределено
//
Функция РаспределитьСуммуПропорциональноКоэффициентам(Знач ИсхСумма, МассивКоэф, Знач Точность = 2) Экспорт
    
    Если МассивКоэф.Количество() = 0 Или НЕ ЗначениеЗаполнено(ИсхСумма) Тогда
        Возврат Неопределено;
    КонецЕсли;
    
    ИндексМакс = 0;
    МаксЗнач   = 0;
    РаспрСумма = 0;
    СуммаКоэф  = 0;
    
    Для К = 0 По МассивКоэф.Количество() - 1 Цикл
        
        МодульЧисла = ?(МассивКоэф[К] > 0, МассивКоэф[К], - МассивКоэф[К]);
        
        Если МаксЗнач < МодульЧисла Тогда
            МаксЗнач = МодульЧисла;
            ИндексМакс = К;
        КонецЕсли;
        
        СуммаКоэф = СуммаКоэф + МассивКоэф[К];
        
    КонецЦикла;
    
    Если СуммаКоэф = 0 Тогда
        Возврат Неопределено;
    КонецЕсли;
    
    МассивСумм = Новый Массив(МассивКоэф.Количество());
    
    Для К = 0 По МассивКоэф.Количество() - 1 Цикл
        МассивСумм[К] = Окр(ИсхСумма * МассивКоэф[К] / СуммаКоэф, Точность, 1);
        РаспрСумма = РаспрСумма + МассивСумм[К];
    КонецЦикла;
    
    // Погрешности округления отнесем на коэффициент с максимальным весом
    Если Не РаспрСумма = ИсхСумма Тогда
        МассивСумм[ИндексМакс] = МассивСумм[ИндексМакс] + ИсхСумма - РаспрСумма;
    КонецЕсли;
    
    Возврат МассивСумм;
    
КонецФункции

(31) знаю я за неё, не так она делает

или я не понял

(32) тогда добей меня, покажи что она не так делает

склоняюсь к (33)

(35)первый параметр будет 55801,12 а второй что?

МассивКоэф - массив коэффициентов распределения?

Мне больше нравится способ когда погрешность не относится на коэффицент с максимальным весом, а когда накапливаемая погрешность учитывается отдельно и используется при распределении на очередной элемент.

(38) а каким образом ее накапливать и распределять на очередной, если отклонение выяснится в конце? Или я что-то упустил?
ну и как бы смысл этого. имхо православнее на максимальный вес

(39) Смысл в том, что исключается накапливание погрешности и возможное значительное искажение элемента с максимальным весом, который может оказаться не таким уж максимальным. Погрешность не накапливается, а размазывается в процессе. Т.е. гуляет всегда максимум "копейка".

(39) Сделал так но копейки один х..лес..й не идут!

Есть сумма Z= 55801,12 ее нужно правильно распределить между X = 510000 и Y = 49855,86

ВсяСуммаРаспределения = X+Y; (559855,86)

ОднДоляСуммыРаспределения = z/ВсяСуммаРаспределения; (0,099670512)

ДоляX = X *ОднДоляСуммыРаспределения  (50831,96093)
ДоляY = Y *ОднДоляСуммыРаспределения  (4969,159073)

ответ 50831,96 и 4969,15

Но копейки нельзя терять поэтому

ДоляY = ВсяСуммаРаспределения - ДоляX

И правильный ответ  

ответ 50831,96 и 4969,16

Думаю это задача 4 или 5 класс А может и 3й класс.

Я в шоке....

(42) одинэсники они такие... =)) не удивлен

(42) "ДоляY = ВсяСуммаРаспределения - ДоляX "
ошибочка! - а если долей 3  или 10 или N? )

(0) очень толсто. тренируйтесь

(42) ну троллит человек. или совсем ГСМ

(44) Я всего лишь для его примера наглядно показал для случая где n =2.
Думаю если он не догадается где n > 2 то это уже клиника.

(39) Сделал так копейки ручной корректировкой, оказалось не мой косяк а бухгалтеров они одно ОС на 0.15 меньше сделали!

Правильно, это как? По каким правилам?