Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.02.2009, 14:52   #1
Witaliy
Форумчанин Подтвердите свой е-майл
 
Регистрация: 27.04.2008
Сообщений: 179
По умолчанию Задача о мандаринах (Pascal)

Задание
Когда урожай созревает Грицко собирает все мандарины и пакует их в ящики. Понятно, что ящики тоже стоят денег, потому Гриць пытается использовать для этого как можно более малую их количество. Но рядом с экономией денег наш главный герой является очень суеверным и никогда не допустит того, чтобы количество мандаринов в ящике были кратны 13. Также он следит за тем, чтобы общее количество использованных ящиков не были кратны 13.
Известно, что в этом году Гриць собрал N мандаринов. Также мы знаем, что один ящик может вместить максимум M мандаринов.
Вам нужно найти минимально возможное количество ящиков, необходимое для упакування всех мандаринов, придерживаясь всех суеверных правил Гриця. Заметьте, что количество мандаринов в ящиках может быть разным. Ящик считается использованным, если в нем содержится хотя бы один мандарин.
Ограничение:
1 <= N, M <= 1000000000 (109)
Входные данные
Во входных данни содержат два целых числа через пробил – N, M. Количество собранных мандаринов и максимальное количество мандаринов, которое можно вместить в ящик.
Выходные даны
Единственное число – искомое количество ящиков, или -1, если через свои суеверия Гриць не сможет расставить мандарины вообще.
Пример введения 1
37 3
Пример выведения 1
14

Совсем не понимаю как такое можна сделать. Буду благодарен за любую помощь.
Спасибо.
www.programmer.uaforums.net - Український форум програмістів.

www.satellite.ipsys.net - Український форум супутникового телебачення.
Witaliy вне форума Ответить с цитированием
Старый 26.02.2009, 16:40   #2
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Извините за оффтоп, а что там где Грицкi живут, там тоже мандарины растут?
puporev вне форума Ответить с цитированием
Старый 26.02.2009, 17:38   #3
Plague
Забанен
Форумчанин Подтвердите свой е-майл
 
Аватар для Plague
 
Регистрация: 01.11.2006
Сообщений: 420
По умолчанию

Если ящик вмещает 1 мандарин и количество собранных мандаринов кратно 13 то ответ -1.
Код:
var n,m,k,t:longint;
begin
  readln(n,m);
  t:=ceil(n/m);
  k:=t;
  if (t mod 13=0)and(m=1) then k:=-1
  else
  if (t mod 13)=0 then k:=t+1;
  writeln(k);
end.
Если ничто другое не помогает, прочтите, наконец, инструкцию! Аксиома Кана
Plague вне форума Ответить с цитированием
Старый 27.02.2009, 00:03   #4
DeKot
Участник клуба
 
Аватар для DeKot
 
Регистрация: 12.08.2008
Сообщений: 1,977
По умолчанию

Цитата:
а что там где Грицкi живут, там тоже мандарины растут?
А знаете ли Вы, что в Грециях, Италиях,Испаниях и Португалиях (это там где растут мандарины) таких Грицьков , наверное, больше чем самих мандарин.
Сорри, тоже за Оффтоп.Это так, для разрядки.
И не сомневайся даже ... отдых - кайф, работа - лажа!
DeKot вне форума Ответить с цитированием
Старый 27.02.2009, 14:30   #5
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Цитата:
Сообщение от DeKot Посмотреть сообщение
А знаете ли Вы, что в Грециях, Италиях,Испаниях и Португалиях (это там где растут мандарины) таких Грицьков , наверное, больше чем самих мандарин.
Если этот Грицько будет так использовать ящики, то хозяин его отошлет обратно на родину

p.s. Извините, не удержался.
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача на Pascal C1er1c Помощь студентам 6 29.12.2008 15:42
Сформировать новый массив,содержащий отрицательные элементы - Задача по PASCAl. Waia Помощь студентам 2 17.12.2008 18:27
Задача на Pascal Skippi Помощь студентам 8 12.09.2008 17:01
Задача на Pascal... Sota Помощь студентам 3 04.05.2008 14:52
Задача [Pascal] [Smarik] Помощь студентам 4 04.02.2008 15:50