Решить в microsoft excel: обычно доставка в интернет-магазине "наш край" стоит 200 рублей, но если цена заказа 1200 рублей и больше, то доставка бесплатная. вычислите в ячейке f3 общую выручку магазина с учётом доставки.

Var   n, i, mn, mx, a: integer; begin   writeln('vvedite n: ');   readln(n);   writeln('vvedite chisla iz otrezka (-20; 20): ');   mn: =0;   mx: =0;   for i: =1 to n do   begin   readln(a);   if (a mod 2)=0 then   if mx< a then mx: =a;     if (a mod 2)< > 0 then   if mn< a then mn: =a;   end;   writeln('maximalnoe chetnoe =',mx);   writeln('maximalnoe nechetnoe =',mn);   readln();     end.

Каждая из компонент связности должна быть кликой (иначе говоря, каждые две вершины в одной компоненте связности должны быть связаны ребром). если в i-ой компоненте связности вершин, то общее число рёбер будет суммой по всем компонентам связности: требуется найти максимум этого выражения (т.е. на самом деле - максимум суммы квадратов) при условии, что сумма всех ni равна n и ni - натуральные числа. если k = 1, то всё очевидно - ответ n(n - 1)/2. пусть k > 1. предположим,  n1 < = n2 < = < = nk - набор чисел, для которых достигается максимум, и n1 > 1. уменьшим число вершин в первой компоненте связности до 1, а оставшиеся вершины "перекинем" в k-ую компоненту связности. вычислим, как изменится сумма квадратов: поскольку по предположению n1 > 1 (тогда и nk > 1), то сумма квадратов увеличится, что противоречит предположению о том, что на выбранном изначально наборе достигается максимум. значит, максимум достигается, если наименьшая по размеру компонента связности - изолированная вершина. выкинем эту компоненту связности, останутся k - 1 компонента связности и n - 1 вершина. будем продолжать так делать, пока не останется одна вершина, тогда получится, что во всех компонентах связности кроме последней должно быть по одной вершине. итак, должно выполняться подставив в исходную формулу, получаем это и есть ответ.