|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.10.2009, 09:33 | #1 |
Регистрация: 03.01.2009
Сообщений: 6
|
Курсовая на Turbo Pascal
Необходимо написать программу на Turbo Pascal.
ЗАДАЧА: Компания "Близэнерго" обеспечивает электричеством M(1≤M≤100) потребителей при помощи N(1≤N≤15) линий электропередачи. Каждый потребитель подключен к нескольким линиям, и электричество у него имеется в случае, если под током находится хотя бы одна из линий. Некоторые из потребителей не оплачивают потребляемую электроэнергию. В связи с энергетическим кризисом руководство компании решило начать отключение неплательщиков. К сожалению, при этом могут быть отключены и некоторые добросоветсно отплачивавшие электроэнергию потребители в случае, когда они оказались подключенными к той же линии что и неплательщики. ЗАДАНИЕ: Требуется по данным о подключении к линиям потребителей и об оплате ими электроэнергии, определить какие линии следует отключить, чтобы: А) отключенными оказались все неплательщики и минимальное количество добросовестных потребителей; Б) подключенными остались все добросовестные потребители, и отключилось максимальное количество неплательщиков. ТЕХНИЧЕСКИЕ ТРЕБОВАНИЯ: Программа должна обеспечивать следующий режим работы: 1) Выводить приглашение ">" и ожидать ввода имени файла 2) Если введена пустая строка, то программа должна вывести сообщение "До свидания!" и закончить работу. 3) Выводить сообщение "Отключение по плану А: "L1 L2 ... Lk", где L1, L2 ... Lk - номера линий (числа через пробел), отсортированные по возрастанию. 4) Выводить сообщение "Отключение по плану Б: "Q1 Q2 ... Qi", где Q1, Q2, ... Qi - номера линий(числа через пробел), отсортированные по возрастанию. 5)Переходить к пункту 1 Если окажется, что согласно плану никого отключать не надо, то в пункте 3 и/или 4 вместо списка потребителей вывести слово "нет". ФОРМАТ ВХОДНОГО ФАЙЛА В первой строке входного файла содержатся числа N и M, разделенные пробелами. В каждой из следующих M строк содержатся числа P C1 C2 ...Cr 0, разделенные пробелами (1≤r≤N). В конце каждой строки находится нуль. Число P равно 0 для неплательщиков и 1 для добросовестных потребителей. Числа C1 C2 ... Cr - номера линий, к котрым подключен данный потребитель. Каждый потребитель подключен хотя бы к одной линии. ПРИМЕР Для входного файла, содержащего 2 3 0 1 2 0 1 1 0 123 Должно быть выведено Отключение по плану А: 1 2 Отключение по плану Б: нет ОБЯЗАТЕЛЬНЫЕ ТРЕБОВАНИЯ 1. Программа должна быть написана в Turbo Pascal 2. Исходный код должен быть максимально прокомментирован, чтобы мне самому разобраться в работе программы 3. Очень желательно описать решение данной задачи математически и указать раздел математики для данной задачи (Например: Дискретная математика. Теория множеств.) Оплата Webmoney или Yandex.Деньги. Предлагайте ваши цены за работу в личку, в Скайп iskymax, на ящик allkall [бака] yandex.ru или Ася три семь 7 8 девять ноль 5 восемь восемь. Либо ваши контакты. |
19.10.2009, 10:30 | #2 |
Максим Николаев
Форумчанин
Регистрация: 15.02.2009
Сообщений: 170
|
Отписал по ICQ
NeshSoft. Программирование на заказ для студентов. Delphi/Pascal. Подробнее на сайте neshsoft.narod.ru
|
19.10.2009, 10:41 | #3 |
Форумчанин
Регистрация: 02.04.2008
Сообщений: 358
|
Обращайтесь помогу
неплохо пишу на ассемблере для 80х86
icq: 3(один)7748666 mail: airyashov(а)inbox.ru |
19.10.2009, 10:42 | #4 |
Максим Николаев
Форумчанин
Регистрация: 15.02.2009
Сообщений: 170
|
Заказ взял
NeshSoft. Программирование на заказ для студентов. Delphi/Pascal. Подробнее на сайте neshsoft.narod.ru
|
19.10.2009, 11:15 | #5 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
"Для входного файла, содержащего 2 3 0 1 2 0 1 1 0 123" а поясните кто-нибудь, что последняя строчка содержит? если просто перечень всех линий, то почему 1) нет пробела? 2) зачем, если их количество уже задано в первой строчке? 3) почему словесно не описано в описании формата входного файла? если я правильно понял. это описание третьего потребителя... тогда всё равно неверно. где ноль в конце? почему тройка? если линий всего две? вроде бы тогда в этой (последней) строчке должно быть: 1 2 0 или я чего-то не понял?.. Последний раз редактировалось Serge_Bliznykov; 19.10.2009 в 11:18. |
19.10.2009, 12:14 | #6 |
Регистрация: 03.01.2009
Сообщений: 6
|
Заказ взял NeshSoft.
Да, действительно 1 2 0, опечатался. Serge_Bliznykov спасибо большое за указание неточности. |
20.10.2009, 10:05 | #7 |
Регистрация: 16.06.2009
Сообщений: 8
|
|
20.10.2009, 10:23 | #8 |
Пользователь
Регистрация: 12.11.2008
Сообщений: 15
|
Стучите в асю 11один11-5шесть5шесть, обсудим.
|
22.10.2009, 14:23 | #9 |
Новичок
Джуниор
Регистрация: 25.07.2009
Сообщений: 2
|
Если еще актуально, готов взяться. ICQ 560413250
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
а free pascal не читает задачи которые написаны на turbo pascal? | demonara | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 25.05.2009 16:28 |
Turbo Pascal | Jasper92 | Помощь студентам | 17 | 25.04.2009 14:17 |
Turbo Pascal | dinozavr | Помощь студентам | 5 | 13.04.2009 22:10 |
переменные Turbo Pascal | Adzumi | Помощь студентам | 7 | 29.03.2008 20:11 |