1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Huver |
14.11.2005 15:32
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Репутация: 0 |
Задача:
Дано N целых чисел A1, A2 ... An. Требуется найти кол-во различных сумм вида k1A1 + k2A2 + ... + knAn. Ввод из файла sums.in. В первой строке находится число N, во второй - A1, A2 ... An через пробел. Вывод в файл sums.out. Вывести одно число - количество различных значений сумм. Пример 1: Ввод 1 3 1 1 2 Вывод 1 5 Пример 2: Ввод 2 5 49 100 98 49 0 Вывод 3 10 Заранее спасибо. Сообщение отредактировано: Huver - 14.11.2005 18:39 |
volvo Сначала уточни, что значит ? Именно на примере 1, ... 14.11.2005 16:06
Huver В файле sums.in записывается вручную:
3 /... 14.11.2005 18:19
volvo разложение числа ничего не напоминает? 14.11.2005 18:29
FreeMan Суммированием всех чисел находишь максимум. Потом ... 14.11.2005 18:41
volvo To: FreeMan
Объясни мне, в свете твоего алгоритма... 14.11.2005 18:44
klem4 Я предлагаю забить числа из файла в массив, а пото... 14.11.2005 18:45
Huver To: volvo
значение сумм одинаковое, а порядок раз... 14.11.2005 19:23
FreeMan To: volvo
Нашёл ты первую сумму. 1+2=3. Посмотрел... 15.11.2005 9:39
volvo Угу... Продолжаем. Нашел вторую, 2+1=3, посмотрел,... 15.11.2005 9:42
FreeMan Не. Когда мы нашли, что тройка подходит - надо к д... 15.11.2005 9:53
FreeMan Вот решение.
Volvo, извини, что так изуродовал тв... 1.12.2005 10:17
volvo FreeMan,
я, например, жду ответа на свой вопрос (ч... 1.12.2005 10:22
c-ch прошу прощения за поднимание явно древней темы :)
... 14.03.2009 20:50
Lapp проблема в том, что этот алгоритм очень трудоёмок ... 15.03.2009 11:51
c-ch Lapp
всё гениальное просто, спасибо огромное :)
P... 15.03.2009 14:02
Lapp PS всем, кто будет копипастить прогу Lapp - будьте... 16.03.2009 3:19
c-ch нет-нет, никаких претензий, тем более, что Паскаль... 16.03.2009 7:25
Lapp Паскаль сам инициализацию вроде делает :)Как-то у ... 16.03.2009 11:37
volvo Угу... Так и должно быть. Турбо/Борланд Паскаль во... 16.03.2009 13:35![]() ![]() |
|
Текстовая версия | 8.12.2025 21:28 |