Способы выплаты суммы n с помощью монет достоинством 1,2,5,10 рублей

@Дианка4567 · Регистрация: 04.06.2012

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

нужно составить програлу в делфи. в консольном окне.

получить все способы выплаты суммы n с помощью монет достоинством 1,2,5,10 рублей (n < = 99)

@vilag · 16.06.2012, 00:34

Погугли "поиск в глубину".

Delphi

procedure Find(sum, ncoins: integer; coins:TIntegerDynArray);
var
  i: integer;
begin
  if sum < 0 then exit;
  if sum = 0 then begin
    for i := 0 to ncoins - 1 do
      write(coins[i], '+');
    writeln;
    exit;
  end;
 
  if length(coins) < ncoins + 1 then
    setlength(coins, ncoins + 1);
  coins[ncoins] := 1;
  if (ncoins = 0) or (coins[ncoins - 1] <= coins[ncoins]) then
    find(sum - 1, ncoins + 1, coins);
  coins[ncoins] := 2;
  if (ncoins = 0) or (coins[ncoins - 1] <= coins[ncoins]) then
    find(sum - 2, ncoins + 1, coins);
  coins[ncoins] := 5;
  if (ncoins = 0) or (coins[ncoins - 1] <= coins[ncoins]) then
    find(sum - 5, ncoins + 1, coins);
  coins[ncoins] := 10;
  if (ncoins = 0) or (coins[ncoins - 1] <= coins[ncoins]) then
    find(sum - 10, ncoins + 1, coins);
end;

Добавлено через 1 минуту
Первый вызов:

Delphi

1	Find(n, 0, coins);

где

Delphi

1 2	var coins: TIntegerDynArray;

Одиночка · 16.06.2012, 10:20

Размен купюры достоинством 100 условных единиц монетами по 2, 5, и10 условных единиц

Новые блоги и статьи
Как преобразовать список списков в простой список в Python bytestream 22.01.2025 При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .	Что такое GUID / UUID и как их создать bytestream 22.01.2025 В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .	Как добавить пустую директорию в репозиторий Git bytestream 22.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с ситуацией, когда необходимо сохранить пустую директорию в репозитории. Данная задача может показаться простой на первый. . .	Как валидировать адрес email в JavaScript bytestream 22.01.2025 JavaScript, как основной язык веб-разработки, предоставляет разработчикам множество инструментов для реализации эффективной валидации email-адресов. От простых встроенных решений до сложных. . .	Как заменить все вхождения подстроки в JavaScript bytestream 22.01.2025 Строки в JavaScript представляют собой неизменяемые последовательности символов, что делает их обработку особенно интересной с точки зрения оптимизации и выбора правильного подхода к решению задач. . . .	Управление версиями пакетов в Node.js. В чем разница между тильдой (~) и кареткой (^) в package.json bytestream 22.01.2025 В современной разработке программного обеспечения управление версиями пакетов играет ключевую роль в обеспечении стабильности и надежности проектов. Node. js, как одна из самых популярных платформ для. . .
Аутентификация на сайте с помощью формы bytestream 21.01.2025 В современном цифровом мире безопасная аутентификация становится краеугольным камнем защиты веб-приложений и пользовательских данных. Каждый день миллионы людей используют различные онлайн-сервисы,. . .	Как получить индекс в цикле for в Python bytestream 21.01.2025 При работе с коллекциями данных в Python часто возникает необходимость не только получить доступ к элементам последовательности, но и знать их позицию в процессе итерации. Индексация в циклах. . .	Как определить адрес, из которого локальный репозиторий Git был клонирован bytestream 21.01.2025 В современной разработке программного обеспечения система контроля версий Git стала неотъемлемой частью рабочего процесса. При работе с Git разработчики часто сталкиваются с необходимостью. . .	Какая разница между операторами == и === в сравнениях в JavaScript bytestream 21.01.2025 В мире веб-разработки JavaScript занимает особое место как динамический язык программирования, предоставляющий разработчикам широкий набор инструментов для создания интерактивных веб-приложений. . . .	Из чего и как собрать свой домашний кинотеатр bt_guru 21.01.2025 Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .	Ошибки стиральных машин bt_guru 21.01.2025 Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .

@Дианка4567 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 3
		1
	Способы выплаты суммы n с помощью монет достоинством 1,2,5,10 рублей 15.06.2012, 23:15. Показов 4892. Ответов 2 Метки нет (Все метки) нужно составить програлу в делфи. в консольном окне. получить все способы выплаты суммы n с помощью монет достоинством 1,2,5,10 рублей (n < = 99) 0

Одиночка 3944 / 1869 / 337 Регистрация: 16.03.2012 Сообщений: 3,880
	16.06.2012, 10:20	3
	Размен купюры достоинством 100 условных единиц монетами по 2, 5, и10 условных единиц 0

Опции темы

Способы выплаты суммы n с помощью монет достоинством 1,2,5,10 рублей

Решение