Forum Coders' city Strona Główna Coders' city
Nasza pasja to programowanie!
 

 PomocPomoc   SzukajSzukaj   UżytkownicyUżytkownicy   GrupyGrupy  RejestracjaRejestracja 
Archiwum starego forum + teoria    RSS & Panel/SideBar
 ProfilProfil   Zaloguj się, by sprawdzić wiadomościZaloguj się, by sprawdzić wiadomości   ZalogujZaloguj 

Potrzebuję szybkiej odpowiedzi na moje pytanie... Zasady

Podział zbioru liczb na podzbiory o maksymalnej sumie wartości

Idź do strony 1, 2, 3 ... 14, 15, 16  Następny

 
Odpowiedz do tematu    Forum Coders' city Strona Główna -> Algorytmy + inżynieria oprogramowania
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
rokiroki



Dołączył: 22 Kwi 2013
Posty: 26

PostWysłany: Sro Sty 15, 2014 9:48 pm  OP    Temat postu: Podział zbioru liczb na podzbiory o maksymalnej sumie wartości Odpowiedz z cytatem Pisownia

Witam

Potrzebuje napisać algorytm który poukłada dane w taki sposób żeby suma kolejnych cyfr była nie większa od zadanego filtra i żeby suma tych cyfr była najwyższa.

np. ciąg 9,8,7,6,5,4,3,2,1
zadana suma to 11
dane po posortowaniu 6,5,4,3,2,1,9,8,7
czyli 6+5,4+3+2+1,9,8,7

Od kilku dni próbuje to zrobić i gdzieś robię błąd
Pozdrawiam

Tytuł wątku zmieniony przez moderatora. Pisz sensowne tematy! marcin_an
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
Filip



Dołączył: 03 Kwi 2009
Posty: 517

PostWysłany: Sro Sty 15, 2014 9:51 pm      Temat postu: Odpowiedz z cytatem Pisownia

Do czego doszedłeś póki co?

Nie rozumiem jaki konkretnie jest cel. Co znaczy "suma kolejnych cyfr"?

_________________
Filip

i tyle.

Google niech Ci wujem będzie, StackOverflow bratem, a Wikipedia siostrą...
Oto czemu uzywam Ubuntu
Jak pytać? | Jak zgłaszać błędy?
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Numer GG
rokiroki



Dołączył: 22 Kwi 2013
Posty: 26

PostWysłany: Sro Sty 15, 2014 9:57 pm  OP    Temat postu: Algorytm optymalizacji Odpowiedz z cytatem Pisownia

Potrzebne jest mi to do napisania programu który usprawni proces zamawiania materiału a następnie pocięcia go na odpowiednie długości. Na przykład klient zamawia 10 desek o różnych długościach a ja muszę zamówić towar w taki sposób aby było jak najmniej odpadu
Pozdrawiam
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
marcin_an



Dołączył: 26 Maj 2005
Posty: 18822

PostWysłany: Sro Sty 15, 2014 10:13 pm      Temat postu: Odpowiedz z cytatem Pisownia

Filip napisał:
Do czego doszedłeś póki co?

_________________
Nieaktywny od 2017-04-01
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość
rokiroki



Dołączył: 22 Kwi 2013
Posty: 26

PostWysłany: Sro Sty 15, 2014 10:34 pm  OP    Temat postu: Algorytm optymalizacji Odpowiedz z cytatem Pisownia

1. Wpisuje dane do tablicy
2. Sortuje je malejąco
3. W pętli sprawdzam która kombinacja ma najmniejszy odpad

I po tym kroku mam pierwszą sumę która spełnia moje kryterium ale nie wiem które to są dane z tablicy :(
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
marcin_an



Dołączył: 26 Maj 2005
Posty: 18822

PostWysłany: Sro Sty 15, 2014 10:40 pm      Temat postu: Odpowiedz z cytatem Pisownia

To jak liczysz, która układ ma najmniejszy odpad, skoro nie wiesz, które deski do niego wchodzą?
_________________
Nieaktywny od 2017-04-01
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość
rokiroki



Dołączył: 22 Kwi 2013
Posty: 26

PostWysłany: Sro Sty 15, 2014 10:45 pm  OP    Temat postu: Algorytm optymalizacji Odpowiedz z cytatem Pisownia

Kod:
vb = 100
Dim t(100, 4)
dim bl,razem,m as integer
razem=0

For q = 1 To vb
bl = 0
For ww = 1 To vb
If q <> ww And bl = 0 Then
licz = licz + 1
If razem + t(ww, 1) <= 6500 And t(ww, 2) = 0 Then: razem = razem + t(ww, 1): bl = 0: t(ww, 2) = licz
End If
Next ww
If razem >= m Then m = razem
razem = 0
Next q
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
samolot



Dołączył: 26 Sty 2006
Posty: 8303
Skąd: Toruń

PostWysłany: Sro Sty 15, 2014 11:42 pm      Temat postu: Odpowiedz z cytatem Pisownia

Cytat:
próbuje to zrobić i gdzieś robię błąd

Za bardzo skomasowałeś kod, na przykład w wwierszu 11 masz po kolei kilka instrukcji oddzielonych przecinkami. Poza tym kod masz nie sformatowany. Obie te wady kodu bardzo Ci utrudniaja analizę prawidlowego działania kodu. Poza tym masz zmienne ponazywane w sposób taki, że nie wiadomo co jest czym, sam sie w tym gubisz,a jeszcze sobie wyobrażasz, że ktos to przeanalizuje?

Poza tym nie wiem czy bieżesz pod uwagę, że każdą deskę zamówiona przez 'produkcję' trzeba porównać z kazdą deska, zamowiona przez Ciebie w tartaku, a nie tylko sumę dlugosci, bo gość z produkcji zamawiajac konkretną deskę o dlugosci np 2,5 m, na pewno nie che jej dostać w dwóch kawałkach? A twój pomysł mi tym pachnie.

_________________
Nie zadawaj bezcelowych pytań / Windows 8.1 / Windows 10 / VB2008 / VB 2010 / VB 2012 / Pisz poprawnie
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
rokiroki



Dołączył: 22 Kwi 2013
Posty: 26

PostWysłany: Czw Sty 16, 2014 5:10 am  OP    Temat postu: Algorytm optymalizacji Odpowiedz z cytatem Pisownia

Kod:
vb = 100
Dim t(100, 4)
dim bl,razem,m as integer
razem=0

For q = 1 To vb
bl = 0
For ww = 1 To vb
If q <> ww And bl = 0 Then
licz = licz + 1
If razem + t(ww, 1) <= 6500 And t(ww, 2) = 0 Then
razem = razem + t(ww, 1)
bl = 0
t(ww, 2) = licz
End If
Next ww
If razem >= m Then m = razem
razem = 0
Next q


Deski są długości 2500mm, od klienta dostaje zamówienie np. 2100,1700,1700,1250,1100,500,600,350.
Ile mam zamówić desek o długości 2500mm żeby odpad był jak najmniejszy?
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
hurgadion



Dołączył: 06 Kwi 2011
Posty: 853
Skąd: Web :)

PostWysłany: Czw Sty 16, 2014 2:51 pm      Temat postu: Odpowiedz z cytatem Pisownia

Witam,
zerknij może tutaj, pozdrawiam.

_________________
miasto nauki praktycznej
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Odwiedź stronę autora Numer GG
Wyświetl posty z ostatnich:   
Odpowiedz do tematu    Forum Coders' city Strona Główna -> Algorytmy + inżynieria oprogramowania Wszystkie czasy w strefie CET (Europa)
Idź do strony 1, 2, 3 ... 14, 15, 16  Następny
Strona 1 z 16

 
Skocz do:  
Możesz pisać nowe tematy
Możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Możesz dodawać załączniki na tym forum
Możesz pobierać pliki z tego forum




Debug: strone wygenerowano w 0.14059 sekund, zapytan = 11
contact

| Darmowe programy i porady Jelcyna | Tansze zakupy w Helionie | MS Office Blog |