9hoch9hoch9 - hohe Zahlen

[Sharky]

Bei mir ist (9^9)^9 = 1,9662705047555291361807590852691 * 10^77

und für 78 Zeichen sollten zwei oder drei Zeilen ausreichen

[Edit]Die Katze war schneller... ich werde alt [/Edit]

[Jörn]

Das E steht für 'mal 10 hoch'.
1,9662705047555291361807590852691e+77
Laut WindowsTaschenrechner das Ergebnis.
Bedeutet:
1,9662705047555291361807590852691 * 10 hoch 77
Also wie Sakura schon gesagt hat, 78 Stellen. Größten Gleitkommatyp nehmen, mittels Power errechnen, passt. Also etwa:
result := power(power(9, 9), 9) MfG

EDIT: Da waren se alle schneller, *schnüff*
Darstellen ohne E als String glaube floattostrf mit Parameter fffixed als TFloatFormat.

[sakura]

Und im Anhang die Lösung

Der entscheidene Code:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  P1, P2, P3: PBigInt;
begin
  INew(P1);
  ISetStr(P1, '9');

  IPow(P1, 9);
  IPow(P1, 9);

  ShowMessage(IStr(P1, 10));
end;

Unter Nutzung der Library

Auszug aus der Lizenz

NX - Multiprecision integer library for Delphi
http://www.ellipsa.net/
Copyright (c), 2003, Marcel Martin.
All rights reserved.

......

[Matze]

Kann man das nicht irgendwie einfacher "zu Fuß" machen?

[sakura]

Zitat von Matze:

Kann man das nicht irgendwie einfacher "zu Fuß" machen?

Wenn Du eine noch einfachere Lösung hast, gerne. Aber so hast Du alle Stellen

......

[nailor]

wenn mich nicht alles irrt, dann ist 9^9^9 aber 9^(9^9) und da brauchst du eine Menge Normzeilen dafür...

[dizzy]

Warum sollte man SO klammern
Doch eher (9^9)^9 oder nicht!? 9^(9^9) kann auch der Ein-Taschenrechner nicht. Ungültige Eingabe

...ach halt! Ne stimmt, hast ja Recht! Erst den Exponenten komplett ausrechnen, und DANN die Basis potenzieren. Ui krass. Dann brauchsts etwas mehr Zeichen, ganz recht.

Also, ich hab nüx gesagt

[Jörn]

Jaaa stimmt. Ich bezweifle aber mal stark, das es für Delphi Datentypen gibt, welche eine solche Zahl darstellen können. Wäre auch schon ein paar KB groß, schätze ich mal. Und nicht ein paar Byte.

[sakura]

Zitat von Jörn:

das es für Delphi Datentypen gibt, welche eine solche Zahl darstellen können

Native nicht, stimmt. Aber die oben genannte Bibliothek kann diese Zahlen nutzen (auch wenn es bei so großen Zahlen laaange dauert)

......

[nailor]

wenn man davon augeht, dass die Zahl ca. 300 Millionen Ziffern hat also so ca. (als string) 300 MB braucht... dauert es seeeehr laaange.