1.Cловами написать алгоритм
2.на языке Си написать сам алгоритм работы.

Для заданной последовательности неотрицательных целых чисел необходимо найти
минимальную сумму двух её элементов, номера которых различаются не менее чем на 4.
Значение каждого элемента последовательности не превышает 1000. Количество элементов
последовательности не превышает 10000.
Входные данные представлены следующим образом. В первой строке задаётся число N —
общее количество элементов последовательности. Гарантируется, что N > 4. В каждой из
следующих N строк задаётся одно неотрицательное целое число — очередной элемент
последовательности.
Пример входных данных:
7
10
45
55
245
35
25
10
Программа должна вывести одно число — описанную в условии сумму.
Пример выходных данных для приведённого выше примера входных данных: 20

Для регистрации и защиты авторского права через РАО, нотариуса или другим аналогичным понадобится предоставить некоторые документы, оплатить услуги регистратора, госпошлины и составить заявление. Общий порядок оформления авторства на продукт интеллектуального труда таков: Обращение в РАО, к нотариусу или другую организацию, занимающуюся регистрацией авторских прав, с заявлением о желании получить патент на что-либо (песня, ноты, книга, фильм и т.д.). Предоставление регистратору копии произведения или фотографий продукта (в случае со скульптурой, например). Предоставление регистратору некоторых документов или информации, которые он попросит (у каждой организации перечень разный). Зачастую в их список входят данные об авторе, его псевдоним (если желает использовать), бумаги, подтверждающие факт обнародования, и прочее. Предоставление регистратору квитанций об оплате его услуг и оплате госпошлин (если необходимо). Получение свидетельства и прочих бумаг, которые подтверждают факт регистрации авторства на конкретное лицо и его защиты. В зависимости от престижности регистратора стоимость защиты авторского права может варьироваться в широких пределах. Большинство авторов в РФ регистрируют патенты на свои произведения, тратя на процедуру от 500 до 3000 рублей.

Объяснение:

Паскаль 

  Var
month:integer;
  Begin
 readln(month);
if ((month >0 ) and ( month < 13)) then
case month of
1 : writeln ('Январь (31 день) ');
2 : writeln ('Февраль (28 дней) ');
3 : writeln ('Март (31 день)');
4 : writeln ('Апрель (31 день) ');
5 : writeln ('Май (28 дней)');
6 : writeln ('Июнь (31 день');
7 : writeln ('Июль (31 день) ');
8 : writeln ('Август (28 день) ');
9 : writeln ('Сентябрь (31 день');
10 : writeln ('Октябрь (31 день) ');
11 : writeln ('Ноябрь (28 дней) ');
12: writeln ('Декабрь (31 день)');
end
else writeln('Ошибка');

End.