Дружные братья

@yuivanenko · Регистрация: 09.01.2010

Author24 — интернет-сервис помощи студентам

Есть три брата. Известно, сколько у каждого из них конфет. Два брата поссорятся, если количество конфет у них отличается больше чем на К. Они могут дарить один другому конфеты. Какое наименьшее количество конфет они должны подарить друг другу, чтобы не поссориться. Если это невозможно сделать - вывести число -1

Для введенных: 1 6 3 2
вывод 2

@кот Бегемот · 04.11.2015, 22:20

Pascal

var
a:array[1..3]of integer;
m1,m2,k,s,i,j,t,sr,r,rez:integer;
begin
for i:=1 to 3 do
read(a[i]);
readln(k);
for i:=1 to 2 do
 for j:=2 to 3 do
 if a[j]<a[j-1] then begin
 t:=a[j];
 a[j]:=a[j-1];
 a[j-1]:=t;
 end;
 r:=k div 2;
 if a[3]-a[1]>2*r then begin
 s:=a[1]+a[2]+a[3];
 sr:=s div 3+s mod 3;
 m1:=s div 3-r;
 rez:=m1-a[1];
 if a[2]<sr then m2:=sr-a[2];
 rez:=rez+m2;
 end
 else rez:=0;
 writeln(rez);
 end.

Новые блоги и статьи
В чем отличие между INNER JOIN и OUTER JOIN bytestream 22.01.2025 В современных базах данных информация часто распределена между множеством взаимосвязанных таблиц, что делает операции объединения JOIN неотъемлемой частью работы с SQL. Эти операции позволяют. . .	Как сделать первую букву заглавной в JavaScript bytestream 22.01.2025 JavaScript предоставляет разработчикам множество инструментов для эффективной работы с текстовыми данными. Одной из часто встречающихся задач при обработке строк является преобразование первой буквы. . .	Что такое Big O нотация и алгоритмическая сложность bytestream 22.01.2025 Введение в алгоритмическую сложность В мире разработки программного обеспечения эффективность алгоритмов играет crucial роль в создании качественных приложений. Алгоритмическая сложность. . .	Как решать конфликты слияния (merge) в Git bytestream 22.01.2025 Конфликты слияния в системе контроля версий Git возникают в ситуациях, когда две или более ветки разработки содержат несовместимые изменения в одних и тех же участках кода. Эти конфликты представляют. . .	Как использовать регулярные выражения bytestream 22.01.2025 Регулярные выражения представляют собой мощный инструмент для работы с текстовыми данными, который позволяет осуществлять поиск, проверку и манипуляцию строками на основе определенных шаблонов. Этот. . .	Как выйти из Vim bytestream 22.01.2025 Vim (Vi IMproved) представляет собой один из самых влиятельных текстовых редакторов в истории компьютерной индустрии, эволюционировавший из своего предшественника Vi, созданного Биллом Джоем в 1976. . .
NoSQL базы данных: что это такое и какие существуют bytestream 22.01.2025 В современную эпоху цифровой трансформации объемы данных растут экспоненциально, создавая новые вызовы для традиционных систем управления базами данных. NoSQL (Not Only SQL) представляет собой. . .	Обновление исследования от команды MCM (январь 2025 г.) Programma_Boinc 22.01.2025 Обновление исследования от команды MCM (январь 2025 г. ) Мы продолжаем изучать молекулярные сигнатуры, связанные с раком легких, с текущим фокусом на GCM1, факторе транскрипции, участвующем в. . .	Как работать с Kafka в Go (Golang) bytestream 22.01.2025 Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки событий и интеграции микросервисов. Эта система, изначально. . .	Как использовать RabbitMQ в Go (Golang) bytestream 22.01.2025 RabbitMQ представляет собой надежный и широко используемый брокер сообщений, который играет ключевую роль в построении современных распределенных систем и микросервисной архитектуры. В основе работы. . .	Как преобразовать список списков в простой список в Python bytestream 22.01.2025 При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .	Что такое GUID / UUID и как их создать bytestream 22.01.2025 В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .

@yuivanenko 34 / 33 / 12 Регистрация: 09.01.2010 Сообщений: 202
		1
	Дружные братья 03.11.2015, 23:04. Показов 1233. Ответов 1 Метки нет (Все метки) Есть три брата. Известно, сколько у каждого из них конфет. Два брата поссорятся, если количество конфет у них отличается больше чем на К. Они могут дарить один другому конфеты. Какое наименьшее количество конфет они должны подарить друг другу, чтобы не поссориться. Если это невозможно сделать - вывести число -1 Для введенных: 1 6 3 2 вывод 2 0

	04.11.2015, 22:20

Дружные братья

Решение