Wurzel ziehen

[NeoDeluxe]

Hi
Ist schon ne weile her, dass ich hier mal nachgefragt habe :) ca 2 Jahre, seit dem ich Delphi angemacht hab. Aber ich hab mal wieder Lust zu coden und muss gleich schon nachfragen.

Da ich nicht wusste was ich programmieren soll, hab ich mal mit simplen Mathe Programm zur Dreieckberechnung angefangen. Da man in diesem Wurzel ziehen muss, wollte ich nachfragen wie es geht :)

Ich habe es zwar mit einer while-Schleife hingekriegt, aber da es ein wenig kompliziert ist, wollte ich fragen, wie man es einfacher machen könnte

Delphi-Quellcode:

    wurzel:=seitec/2;
    while (wurzel*wurzel)>=seitec do
      begin
        wurzel:=wurzel-0.01;
        edtc.Text:=FloatToStr(wurzel);
      end;

Mit sqrtklappt bei mir irgendwie nicht :(

[leddl]

Du könntest auch einfach die Unit Math einbinden und über Sqrt dann die Wurzel ziehen. ;)

[NeoDeluxe]

Hmm, und wo find ich diese Unit? :gruebel: find ich in Hilfe nicht, über SuFu auch nichts :|

[leddl]

Mach mich net schwach, natürlich findest du die in der Hilfe... :roll: Einfach in die Uses aufnehmen und dat läuft. ;)

[Chegga]

Hi,

@NeoDeluxe:
Einfach hinter uses (oben in deiner Unit) Math reinschreiben.

Und dann noch:
sqrt

MfG Marc

[Edit] Leute, ihr müsst dringend schneller werden! :mrgreen: [/Edit]

[r2c2]

Zitat:

Zitat von NeoDeluxe

Hmm, und wo find ich diese Unit? :gruebel: find ich in Hilfe nicht, über SuFu auch nichts :|

Delphi-Quellcode:

uses
  ... Math;// da kommt 'Math' hin!

...

var
  Wurzelvon5: Double;

Wurzelvon5 := sqrt(5);

mfg

Christian

P.S.: und, wenn du in der Hilfe guckst, findest du Math mit Sicherheit!

//Edit: Ich bin zu langsam für diese Welt... :(

[Bart82]

Ich bin mir auch nicht sicher, ob deine Wurzelfunktion überhaupt funktionieren kann:

Wurzel aus 2?
-> Varibale Wurzel = 1
-> 1 * 1 >= 2 wird nie richtig!

Deshalb kann ich mich den Vorrednern nur anschließen: Math-Unit

[NeoDeluxe]

perfekt, danke schön
und nochmal sry für mein dummsein :] :wall:

//edith

Zitat:

Zitat von Bart82

Ich bin mir auch nicht sicher, ob deine Wurzelfunktion überhaupt funktionieren kann:

Wurzel aus 2?
-> Varibale Wurzel = 1
-> 1 * 1 >= 2 wird nie richtig!

Deshalb kann ich mich den Vorrednern nur anschließen: Math-Unit

doch die hat funktionier, ist aber auch egal!

[r2c2]

Zitat:

Zitat von Bart82

Ich bin mir auch nicht sicher, ob deine Wurzelfunktion überhaupt funktionieren kann:

Wurzel aus 2?
-> Varibale Wurzel = 1
-> 1 * 1 >= 2 wird nie richtig!

Hab mir den Algorithmus noch gar nicht angeguckt, ab jetzt, wo dus sagst. Hm... ungewöhnlich. :mrgreen: Wenn man selbst Wurzeln ziehen will, dann bitte nicht so. Dafür gibts z.B. den Heron oder die Intervall-Schachtelung.

mfg

Christian

//Nachtrag:

Zitat:

Zitat von NeoDeluxe

perfekt, danke schön
und nochmal sry für mein dummsein :] :wall:

Du musst dich nicht entschuldigen. Wenn du keine Fehler machen würdest, könntest du auch nix lernen. Mir sind Leute die Fehler machen(und zu denen gehör natürlich auch ich) lieber, als solche, die nur ne Frage stellen um die fertige Lösung abzutippen.

[BlackJack]

ich wollte nur mal anmerken dass die Sqrt-funktion in der Unit System enthalten ist, die automatisch eingebunden wird, von daher sollte man an der uses-Liste eigentlich nichts ändern mussen... :gruebel: