-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
2. Mär 2004
@Hagen: Geschätzt sind 4 Minuten. Nach knap 6 Minuten hat Dein Proggie die Datei 9x9x9.bin gespeichert - seit dem macht es weiter und weiter und weiter ... nur was :shock:
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
2. Mär 2004
*meld*
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
25. Feb 2004
Nach einer Stunde war ich etwa auch so weit, nur dann wird es langsam... 18h10' ... 9^1.570.000
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
25. Feb 2004
Hast Du Dein oder mein Programm genutzt?
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
25. Feb 2004
Hat ca. 350K Stellen ;-)
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
25. Feb 2004
Also, von ca. 9^380Mio bin ich nach 16 1/2 h bei 9^1,5Mio angekommen. Wen es interessiert, der möge sich die Lösung anschauen: 9^1.500.000.zip (ca. 659KB)
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
24. Feb 2004
Wohl eher eine Frachtsendung :roll: - Ich bin zur Zeit bei 9^470.000. Das ist eine ca. 450KB große Zahl ;-)
...:cat:...
P.S.: Das sind in Courier New (Größe 6pt) auf A4 32,2 Seiten ;-)
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
24. Feb 2004
Doch, nur der Speicherverbrauch war innerhalb der ersten 10 Sekunden höher als wirklich nötig 400 MB :shock:
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
24. Feb 2004
Update, da war noch ein Speicherleck nach der letzten Optimierung :oops: (Code ist oben neu enthalten)
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
24. Feb 2004
So, ich habe mich auch ein wenig gequält. Nach 32 Minuten hatte ich immerhin schon 9^280.000 berechnet. Das Ergebnis ist im Anhang. Desweiteren habe ich eine Unit getippt, die auf das Problem optimiert ist und füge diese bei. Viel Spaß beim weitertüfteln. Alles ohne Kommentar, da es mit nur um den Spaß an der Freude ging.
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
24. Feb 2004
Und wo, damit ich es auch wieder löschen kann...
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Auf was für einem Rechner ;-) Also, es wird schon ein paar Minütchen, Stündchen, ... dauern.
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Ja...
10^(10^10) hat 10^(1000000000) oder 10^(1e10) Ziffern, also 1e1000000000, eine 1 mit 1.000.000.000 Nullen hinten dran, dementsprechend ist 9^(9^9) nur "etwas" kleiner.
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Native nicht, stimmt. Aber die oben genannte Bibliothek kann diese Zahlen nutzen (auch wenn es bei so großen Zahlen laaange dauert)
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Wenn Du eine noch einfachere Lösung hast, gerne. Aber so hast Du alle Stellen ;-)
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Und im Anhang die Lösung ;-)
Der entscheidene Code:
procedure TForm1.Button1Click(Sender: TObject);
var
P1, P2, P3: PBigInt;
begin
INew(P1);
ISetStr(P1, '9');
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Während 9*9*9 = 729
ist 9^9^9 = 1,9662705047555291361807590852691e+77 also eine 78-stellige :!: Zahl und nicht mehr.
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Das stimmt nicht, 9^9^9 ist eine 78 stellige Zahl und dafür braucht man nicht einmal zwei Normzeilen!
...:cat:...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by sakura,
23. Feb 2004
Integer geht bis über 2-Milliarden...
...:cat:...