{как-то раз, придя домой со школы, света обнаружила записку от мамы, в которой она просила сделать салат. света знала, что салат – это смесь двух или более ингредиентов, поэтому ей не составило труда выполнить мамину просьбу. но света хочет стать , поэтому, для тренировки, решила посчитать, сколько различных салатов она сможет сделать из имеющихся продуктов (майонез, огурцы, помидоры). после небольших расчетов она получила ответ: 4. зная, что вы любите интересные , и хотите стать программистами, света попросила вас написать программу, которая определяет количество различных салатов для произвольного числа ингредиентов.}подскажите формулу

Количество различных салатов r, которые можно приготовить, имея n продуктов и беря для приготовления k из них (k=2, n-1), в определяется, как число размещений из n по k и определяется по следующей формуле: формула красивая, короткая, но неудобная для вычисления. в самом деле, надо найти три факториала, каждый из которых может оказаться достаточно большим числом. но можно сделать небольшое преобразование и вычисление. но это было вычисление r только для конкретного k при заданном n. нам же нужно найти сумму r для всех k от 2 до n. и да, для k=n формула не предназначена, но зато мы и так понимаем, что для такого случая r=1. свелась к нахождению обычной суммы // pascalabc.net 3.2, сборка 1370 от 24.12.2016 // внимание! если программа не работает, обновите версию! function c(n,k: integer): integer; begin   if n=k then result: =1   else begin       var p: =1.0;       for var i: =1 to n-k do p: =p*(k+i)/i;       result: =round(p);       end; end; begin   var n: =readinteger('кол-во продуктов: ');   var s: =1;   for var i: =2 to n-1 do s: =s+c(n,i);   writeln('кол-во салатов: ',s) end. примеры: кол-во продуктов:   3 кол-во салатов: 4 кол-во продуктов:   5 кол-во салатов: 26 кол-во продуктов:   10 кол-во салатов: 1013

Получить ссылку 2 это точно