|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
04.10.2017, 21:42 | #1 |
Пользователь
Регистрация: 04.10.2017
Сообщений: 10
|
Помогите с программой
var
i,j,l,t,k,sum, N,S: word; begin write('Предел для перебираемых чисел: '); readln(N); write('Искомая сумма: '); readln(S); for i:=1 to N do for j:=1 to N do for l:=1 to N do for t:=1 to N do begin sum := i + j + l + t; if sum = S then writeln(i,' ',j,' ',l,' ',t); end; readln; end. Вот код программы, нужно что бы в каждой комбинации не было повторяющихся чисел(если они есть) Снимок.PNG Вот скриншот этой программы Нужен готовый код! Последний раз редактировалось Hamza117; 04.10.2017 в 22:06. Причина: Дополнение |
04.10.2017, 21:58 | #2 |
Старожил
Регистрация: 25.08.2011
Сообщений: 2,841
|
Тут алгоритм будет посложнее.
Skype - wmaster_s E-Mail - WorldMasters@gmail.com
Работаем по 3 критериям - быстро, качественно, недорого. Заказчик выбирает любые два. |
04.10.2017, 21:58 | #3 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
Еще 6 условий в которых сравнивать счетчики между собой?
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
04.10.2017, 22:04 | #4 |
Старожил
Регистрация: 25.08.2011
Сообщений: 2,841
|
Это переборы без повторений. В интернете есть уже готовые решения. Я помню чтото похожее делал так типа там код получился достаточно громоздкий.
Skype - wmaster_s E-Mail - WorldMasters@gmail.com
Работаем по 3 критериям - быстро, качественно, недорого. Заказчик выбирает любые два. |
04.10.2017, 22:09 | #5 |
Пользователь
Регистрация: 04.10.2017
Сообщений: 10
|
|
04.10.2017, 22:18 | #6 |
Пользователь
Регистрация: 04.10.2017
Сообщений: 10
|
Если можете, напишите код, на основе моего, только с решением данной задачи.Пожалуйста!
|
04.10.2017, 22:21 | #7 |
Старожил
Регистрация: 25.08.2011
Сообщений: 2,841
|
На следующей неделе разве что. Как с отпуска вернусь.
Skype - wmaster_s E-Mail - WorldMasters@gmail.com
Работаем по 3 критериям - быстро, качественно, недорого. Заказчик выбирает любые два. |
04.10.2017, 22:24 | #8 |
Пользователь
Регистрация: 04.10.2017
Сообщений: 10
|
Ох... Почти месяц не могу это сделать, ни на каких форумах не помогают... А этого решения нигде не нашёл, всё прошерстил. Последняя надежда-форумы.
|
04.10.2017, 22:29 | #9 |
Старожил
Регистрация: 25.08.2011
Сообщений: 2,841
|
Надо было в разделе фриланс разместить и дело бы пошло быстрее.
Skype - wmaster_s E-Mail - WorldMasters@gmail.com
Работаем по 3 критериям - быстро, качественно, недорого. Заказчик выбирает любые два. |
04.10.2017, 22:40 | #10 |
Участник клуба
Регистрация: 14.05.2016
Сообщений: 1,793
|
На второй странице....
Последний раз редактировалось ura_111; 04.10.2017 в 23:10. |
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите с программой на си | anerv | Общие вопросы C/C++ | 0 | 26.05.2014 22:12 |
Помогите с программой | jhon_jhonson | C++ Builder | 0 | 07.10.2013 10:04 |
Помогите с программой | andresan | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 4 | 17.11.2009 17:19 |