Forum: Sonstige Fragen zu Delphi
Delphi
by ibp,
13. Okt 2004
hab noch ne idee:
mit folgender prozedur bekommst du alle möglichen kombinationen von 4 elementen, die der summe entsprechen
procedure TForm1.Perm(AnzElem,summe:word);
var i1,i2,i3,i4:word;
begin
memo1.Clear;
for i1:=1 to AnzElem do
for i2:=1 to AnzElem do
Forum: Sonstige Fragen zu Delphi
Delphi
by ibp,
13. Okt 2004
.. ansatzversuch...
n X n matrix
1. array:=m mit m=n*n
2. a=1, b=n
3. summe(array)=gesuchte zahl
ja: a=a+n, b=b+n, weiter bei 3. solange b<m danach ausgabe des arrays
nein: weiter bei 4.
4. vertausche zahlen im array nach einem algorythmus der alle permutationen darstellt ( wie hab gerade noch keine ahnung schaue aber mal)