🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.funkcyjne
Article #962

Re: zupki

#962
From: luckboy
Date: Tue, 20 Oct 2009 09:55
42 lines
2371 bytes
Czarek pisze:
> Czarek pisze:
>> Czarek pisze:
>>
>>> Jak prosto to zaprogramować? Niby można za pomocą 6 zagnieżdżonych 
>>> pętli, ale przy dopisaniu liczby może zajść konieczność modyfikacji 
>>> tekstu programu i ponownej kompilacji.
>>
>> Miałem na myśli, że trzeba użyć 2,3,4,5 i 6  pętli, żeby wybierać 
>> zestawy liczące 2,3 .. 6 liczb. Coś w stylu
>> for a := 1 to ilosc - 1 do
>>   for b := a + 1 to ilosc do
>>     begin
>>       sumowanie;
>>     end;
>>
>> dla sumowania zestawu 2 liczb. Dla 3 - 3 pętle itp.
>>
>> Może ktoś ma bardziej elegancki pomysł, aby nie rekurencyjnie, 
>> maszynka nie podoła.
>>
> 
> Już sobie z tym poradziłem.
> Sortuje dane wejściowe, sumuje po kolei od najmniejszej do przekroczenia 
> załozonej sumy i już wiem ile maksymalnie danych trzeba wybrać ze zbioru 
> wejściowego.
> Potem już tylko w pętli
> 
>    for k :=1 to mk do
>        kombinacje(n,k);
> 
> Czas wykonania spadł 50..60 razy (dla 35 liczb).
> Na razie do przyjęcia, ale mam kolejny pomysł. Jeśli wybieram zbiory 2 
> elementowe i suma najmniejszej i najwiekszej liczby jest za duża, to 
> mogę śmiało wywalić z danych wejściowych największą  liczbę. Jesli 3 
> elementowe sprawdzam sumę 2 najmniejszych i największą. Myślę, że to 
> może też znacznie przyspieszyć.
> Czy tu ktoś zagląda?
> 
> Pozdrawiam
> 
A może programowanie dynamiczne?
Technical Details
Message-ID: <hbk1fa$jd8$1@news.onet.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!news.nask.org.pl!news.onet.pl!not-for-mail
References: <hbceak$ob$1@atlantis.news.neostrada.pl> <hbceso$1u4$1@atlantis.news.neostrada.pl> <hbf027$hnt$1@nemesis.news.neostrada.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!news.nask.org.pl!news.onet.pl!not-for-mail
From: luckboy <luckboy@vp.pl>
Newsgroups: pl.comp.lang.funkcyjne
Subject: Re: zupki
Date: Tue, 20 Oct 2009 11:55:54 +0200
Organization: http://onet.pl
Lines: 42
Message-ID: <hbk1fa$jd8$1@news.onet.pl>
References: <hbceak$ob$1@atlantis.news.neostrada.pl> <hbceso$1u4$1@atlantis.news.neostrada.pl> <hbf027$hnt$1@nemesis.news.neostrada.pl>
Reply-To: luckboy@vp.pl
NNTP-Posting-Host: adti174.neoplus.adsl.tpnet.pl
Mime-Version: 1.0
X-Trace: news.onet.pl 1256032554 19880 79.185.220.174 (20 Oct 2009 09:55:54 GMT)
X-Complaints-To: niusy@onet.pl
NNTP-Posting-Date: Tue, 20 Oct 2009 09:55:54 +0000 (UTC)
User-Agent: Thunderbird 2.0.0.22 (X11/20090719)
In-Reply-To: <hbf027$hnt$1@nemesis.news.neostrada.pl>
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit