Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
2 / 0 / 0
Регистрация: 25.10.2013
Сообщений: 43

Файлы. Определение наименьшего числа конфет, которые придётся съесть Карлсону

05.12.2017, 10:24. Показов 1379. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Программирование в файлы.
Миниатюры
Файлы. Определение наименьшего числа конфет, которые придётся съесть Карлсону  
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
05.12.2017, 10:24
Ответы с готовыми решениями:

Определение наибольшего и наименьшего числа. Перевести с паскаля
uses crt; var a,b,max,min: integer; begin read(a); max:=a; min:=a; if a=0 then exit; repeat read(b); if (b<>0) and...

Составить программу определения наименьшего числа ферзей, которые можно расставить на доске
Пожалуйста, помогите решить вот такую задачу Минимум ферзей. Составить программу определения наименьшего числа ферзей, которые...

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

3
05.12.2017, 10:34
 Комментарий модератора 
Перепечатайте задание в тему руками.
0
2 / 0 / 0
Регистрация: 25.10.2013
Сообщений: 43
05.12.2017, 10:47  [ТС]
Карлосон самый лучший в мире упаковщик. Если количество конфет в некоторых упаковках оказывается разным, Карлосон перекладывает часть конфет так, чтобы во всех коробках было конфет поровну. Если это сделать невозможно, он съедает одну конфету и так поступает до тех пор, пока не наступит момент когда оставшиеся конфеты можно будет распределить поровну между коробками. Например, если в трех коробках находится 3, 4, 5 конфет соответственно, то карлосон перекладывает одну конфету из последней коробки в первую, при этом во всех коробках будет одинаковое количество конфет. По 4. Однако если в коробке 3 4 7 , то карлосон сначала съедает 2 конфеты в последней коробке, а затем перекладывает из нее одну конфету в первую коробку.
Определить наименьшее число конфет, которые придётся съесть карлосону , а так же наименьшее число конфет, которые ему нужно переложить , чтобы во всех коробках было одинаковое количество конфет.


Получается в input две строки
3 кол во коробок
3 4 5 кол во конфет в каждой коробке

А в output
0 1

Могу только конкретно с тоемя коробками решить. Не пойму как сделать с неизвестным числом коробок
0
Платежеспособный зверь
 Аватар для кот Бегемот
8966 / 4389 / 1655
Регистрация: 28.10.2009
Сообщений: 11,647
06.12.2017, 22:16
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
a:array[1..1000]of integer;
i,n,sred,am:integer;
s,s2:longint;
begin
readln(n);
s:=0;
s2:=0;
for i:=1 to n do
begin
read(a[i]);
s:=s+a[i];
end;
am:=s mod n;
sred:=s div n;
for i:=1 to n do
if a[i]<sred then s2:=s2+(sred-a[i]);
writeln('Karlsson skushal ',am,' konfet');
writeln('Perelojili ',s2, ' konfet');
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
06.12.2017, 22:16
Помогаю со студенческими работами здесь

Найти максимальное суммарное число гамбургеров и чизбургеров, которые Гомер может съесть за обед
Обеденный перерыв Гомера Симпсона составляет T миллисекунд. Один гамбургер Гомер съедает за N миллисекунд, один чизбургер - за M. Требуется...

Определение стоимости конфет (блок-схема)
Program For4; var i:integer; A:real; begin Writeln('Введите вещественное число - цена 1 кг конфет A='); readln(A); for i:=1...

Дано вещественное число -- цена 1кг конфет. Вывести стоимость 0,1, 0,2, ..., 1 кг конфет
Помогите решить задачу. Дано вещественное число -- цена 1кг конфет. Вывести стоимость 0,1, 0,2, ..., 1 кг конфет. С объяснениями,...

Дано вещественное число — цена 1 кг конфет. Вывести стоимость 1, 2, …, 10 кг конфет
Дано вещественное число — цена 1 кг конфет. Вывести стоимость 1, 2, …, 10 кг конфет. А с этим как быть на С++?!

Дано вещественное число - цена 1 кг конфет. Вывести стоимость 0.1,0.2, .1 кг конфет
дано вещественное число-цена 1кг конфет. вывести стоимость 0.1,0.2, ...1кг конфет.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru