|
Вопрос # 4 213/ вопрос открыт / |
|
Здравствуйте, эксперты!
вводится вес рюкзака, количество предметов со стоимостью и весом. надо отобрать самые лучше предметы в заданный рюкзак.
могу даже купить хорошую прогу icq=390431607
 |
Вопрос задал: sinnop (статус: Посетитель)
Вопрос отправлен: 23 мая 2010, 19:04
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 35; последнее сообщение — 24 мая 2010, 11:55; участников в обсуждении: 3.
Страницы: [1] [2] [Следующая »]
|
IlluminatI (статус: 2-ой класс), 23 мая 2010, 19:18 [#1]:
самые лучшие по цене или про весу? или по тому и другому вместе?
|
|
sinnop (статус: Посетитель), 23 мая 2010, 19:22 [#2]:
по цене, всмысле рюкзак определенным весом должен иметь наибольшую стоимость. получается по цене)
|
|
sinnop (статус: Посетитель), 23 мая 2010, 19:27 [#3]:
из множества предметов со свойствами «стоимость» и «вес», требуется отобрать некое число предметов таким образом, чтобы получить максимальную суммарную стоимость при одновременном соблюдении ограничения на суммарный вес.
могу прикрепить много теор. материала кто в силах справится до завтра с задачей. в идеале решение методом динамического программированя.
|
|
IlluminatI (статус: 2-ой класс), 23 мая 2010, 20:23 [#4]:
прикрепи)
|
|
sinnop (статус: Посетитель), 23 мая 2010, 20:50 [#5]:
формулы суда не напишешь и прикрепить хз. может на почту пришлю? сюда просто формулы не вставляет
|
|
min@y™ (статус: Доктор наук), 23 мая 2010, 21:13 [#6]:
А сколько платишь деньгов за выполнение задачи?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
min@y™ (статус: Доктор наук), 23 мая 2010, 21:20 [#8]:
Какие именно операторы ты там не понимаешь?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
sinnop (статус: Посетитель), 23 мая 2010, 21:20 [#9]:
скажите приемлимую цену. могу webmoney или на сотовый кинуть. не дайте потануть студенту))
|
|
min@y™ (статус: Доктор наук), 23 мая 2010, 21:23 [#10]:
Цитата (sinnop):
скажите приемлимую цену
$100500.
Но если разжуёшь проблему - бутылка пива.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
min@y™ (статус: Доктор наук), 23 мая 2010, 21:27 [#11]:
Посмотрел твой код из С++Билдера. Аццкий профи писал, 1600кг! Даже параметры циклов FOR объявлены глобально. Вот это жэсть... Я б за такой брейнфакинг руки отрубал нахрен!
А за присвоение переменным имён "a", "b", "c",..., "z" вообще надо расстреливать без суда и следствия.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
sinnop (статус: Посетитель), 23 мая 2010, 21:32 [#12]:
проблема 1) переделать код который выше выложен в обычное дельфи. чтобы работало в окошке дельфи нормально.
или 1*) мне изучать этод код до запятой или как там препод будит проверять я не знаю.
и бутылка пива может разная.
просто я не знаю что делать.
и цена хз. думаю до пятихатки можно сделать. просто на с+ она работает нормально.
|
|
sinnop (статус: Посетитель), 23 мая 2010, 21:34 [#13]:
вот вот, а если препод вопросы будит задавать а еще в синтаксесе операторах не разбираюсь, прикол будит один.
|
|
sinnop (статус: Посетитель), 23 мая 2010, 21:38 [#14]:
да и вообще если скрин дашь дельфи проги оформленной норм и работающей нормально(отбирающей предметы в рюкзак для 3-10 предметов) то цену пересмотрим. у меня стипуха горит о_О
|
|
min@y™ (статус: Доктор наук), 23 мая 2010, 21:41 [#15]:
Завтра в 8 утра постучись мне в аську. Посмотрим, что сделать можно. А щас я мыться иду и спать. Утром на работу.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
sinnop (статус: Посетитель), 23 мая 2010, 21:42 [#16]:
ммм...мне завтра ее сдавать
|
|
sinnop (статус: Посетитель), 23 мая 2010, 21:46 [#17]:
или все схвачено не появлюсь в уневере типо шею сломал в душе о_О
|
|
min@y™ (статус: Доктор наук), 23 мая 2010, 22:11 [#18]:
Цитата (sinnop):
ммм...мне завтра ее сдавать
Молодец! Тянул весь семестр, а теперь хочешь всё и сразу. А я спать хочу, мне утром на работу.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
sinnop (статус: Посетитель), 23 мая 2010, 22:27 [#19]:
в принципе согласен..оболтус но
весь семестр не тянул а написал хорошую теор. работу и оформил. просто кодинг забросил и думал той какая есть прога будит вполне достаточно. а оказалась наоборот. ладно в 8 в асю напишу
|
|
sinnop (статус: Посетитель), 23 мая 2010, 22:35 [#20]:
а как вам такая лабуда? О____О=====
uses
SysUtils;
var
P:array of extended;
G:array of extended;
t:array of extended;
W:array of integer;
I:array of integer;
j,c,m,k,l,v,j1:integer;
begin
writeln('w=');
readln(m);
writeln('i=');
readln(j); j1:=j;
l:=0;
v:=m-1;
setlength(i,j);
for j := 0 to high(I) do
begin I[j]:=l+1;
l:=l+1;
end;
setlength(P,j1);
for j:= 0 to high(P) do
begin write('vvedite P[i]');
readln(P[j]);
end;
setlength(G,j1);
for j:= 0 to high(G) do
begin write('vvedite G[i]');
readln(G[j]);
end;
setlength(W,v);
setlength(t,j1);
for j:= 0 to high(t) do
begin
T[j]:=p[i[j]]/g[i[j]];
end;
for j:= 0 to high(t) do
begin
if (t[j]=t[j+1]) and (g[j]<g[j+1])
then t[j]:=t[j]+0.0000001
else t[j+1]:=t[j+1]+0.0000001;
end;
for j := 0 to high(i) do
if t[i[j]]<t[i[j+1]]
then
begin c:=i[j+1];
i[j+1]:=i[j];
i[j]:=c;
end;
w[0]:=1;
k:=0;
for j := 0 to high(i) do
begin
while k<=m do
begin
w[v]:=i[j];
v:=v-1;
k:=k+1;
end;
end;
for v := 0 to high(w) do
write('w[i]',w[v]:2);
___________________________
идея всей этой бредятины- работа с индексами массивов. и с помощью уличной магии поменять их местами а потом сделать W массив типо он будит говорить нам о индексов предметов в рюкзаке. например: W= 1,1,1,1,1,5 где 1 и 5 это номера предметов введенных пользователем.
реал шею свехнешь о_О
|
Страницы: [1] [2] [Следующая »]
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|