Komplexe Zahlen und Brüche mit überladenen Operatoren

Kroko · Beiträge: 1284 W98 W2k WXP Turbo D

Ich habe, angeregt durch mehrere Threads, mal eine Unit programmiert, welche das Rechnen mit komplexen Zahlen realisiert.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

var
  A,B,C: TComplex;
begin
  A.Create(2,3);
  B.Create(4,5);
  C := A+B; //C=6+8i

Beispielprogramm ist angehängt, Quellen ebenfalls
* Version 2.0
- Operatoren x, -, *, / überladen
- Float,String nach TComplex
- TComplex nach String
- komplexe Null, konjugiert komplexe Zahl
- Betrag, Betrag²
- Reziproke, Skalierung
- Test, ob reelle Zahl
- Winkel zur X-Achse, Polarkoordinaten
- Funktionen
= Sinus, Kosinus, Tangens, Kotangens
= Quadrat, Quadratwurzel, Reziprokes
= Ln, Exp und Power

Einloggen, um Attachments anzusehen!

_________________
Die F1-Taste steht nicht unter Naturschutz und darf somit regelmäßig und oft benutzt werden! oder Wer lesen kann, ist klar im Vorteil!

nagel · Beiträge: 708 Win7, Ubuntu 10.10

Korrigier mich, wenn ich mich täusche, aber dafür ist doch schon eine Unit bei Delphi dabei. VarCmplx heißt die iirc.

Kroko · Beiträge: 1284 W98 W2k WXP Turbo D

ja, aber die basiert auf Variants und sollte geschwindigkeitsmäßig unterliegen(hoffentlich, ungetestet)!

_________________
Die F1-Taste steht nicht unter Naturschutz und darf somit regelmäßig und oft benutzt werden! oder Wer lesen kann, ist klar im Vorteil!

nagel · Beiträge: 708 Win7, Ubuntu 10.10

Ah ja, dann hört sich das ja ganz interessant an.

Kroko · Beiträge: 1284 W98 W2k WXP Turbo D

Und jetzt noch eine zweite Unit über Brüche dazu:
zum Beispiel:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

var
  X,Y,Z: TBruch;
begin
  X := '2/1/5';
  Y.Create(2,3);
  Z := X+Y;
  Z := X-Y;
  Z := X*Y;
  Z := X/Y;
end;

* Version 1.0
- Operatoren x, -, *, / überladen
- Float,String nach TBruch
- String im Format: Ganzer Teil/Zähler/Nenner möglich
- TBruch nach String
- Funktionen
= Sqr; Rcp, Abs
- Procedure PaintBruch

Einloggen, um Attachments anzusehen!

_________________
Die F1-Taste steht nicht unter Naturschutz und darf somit regelmäßig und oft benutzt werden! oder Wer lesen kann, ist klar im Vorteil!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme