Author Topic: Testaufgabe 7 - Taylor-Polynom (Read 1988 times)

VanGuetti · « **on:** May 18, 2006, 10:52:06 am »

Grüßt euch...
Muss die funktion f(x)=exp(x) durch ein zugehöriges Taylor-Polynom graphsich dargestellen. Dabei soll sichtbar werden, wie sich die Approximation durch n-Reihenglieder ändert und ich soll das Programm noch erweitern damit beliebige Entwicklungspunkte a verwendet werden können...

Tn(x)= SUMME(k=0;n) (x^k)/(k!)

Das Problem ist, dass ich kaum eine Ahnung von Delphi hab, und deshalb jetzt ein bischen auf dem Schlauch steh...

Würde mich freuen wenn ihr mir paar Tipps geben könntet...

Danke...

MasterSID · « **Reply #1 on:** May 18, 2006, 06:49:14 pm »

Habe diese Aufgabe auch. Aber momentan gibt es andere Sachen zu tun. Fakt ist, so wie du die Formel dort hingeschrieben hast, wird es nicht funktionieren. Bei dir gibt es keine beliebigen Entwicklungspunkte a. Am besten du gibst bei Wikipedia mal Taylorpolynom ein, und guckst dir mal die Formel dort an. Die ist besser. Und dann kannste das ja mal mit Mathcad berechnen lassen, um erstmal zu sehen, was dort eigentlich passiert. Dann denke ich mal weist du in welche Richtung es gehen soll. Ich hoffe das hilft, hat mir auch geholfen.

MFG

VanGuetti · « **Reply #2 on:** May 31, 2006, 09:17:19 pm »

Quote

Originally posted by MasterSID@18.5.2006 - 18:49
Habe diese Aufgabe auch. Aber momentan gibt es andere Sachen zu tun. Fakt ist, so wie du die Formel dort hingeschrieben hast, wird es nicht funktionieren. Bei dir gibt es keine beliebigen Entwicklungspunkte a. Am besten du gibst bei Wikipedia mal Taylorpolynom ein, und guckst dir mal die Formel dort an. Die ist besser. Und dann kannste das ja mal mit Mathcad berechnen lassen, um erstmal zu sehen, was dort eigentlich passiert. Dann denke ich mal weist du in welche Richtung es gehen soll. Ich hoffe das hilft, hat mir auch geholfen.

MFG

ja okay werd das mal ausprobieren...

hab vielen dank

Master3 · « **Reply #3 on:** June 08, 2006, 05:45:48 pm »

Wenn jemand Hilfe braucht bei dem Programm, steh ich gern zur Seite.
Habe es nun so gut wie fertig bzw. es ist fertig^^.

MasterSID · « **Reply #4 on:** June 08, 2006, 10:48:18 pm »

Quote

Originally posted by Master3@8.6.2006 - 17:45
Wenn jemand Hilfe braucht bei dem Programm, steh ich gern zur Seite.
Habe es nun so gut wie fertig bzw. es ist fertig^^.

Ja ich nehme deine Hilfe gern in Anspruch. Ich würde gerne wissen, wie das mit dem Records funktioniert?? Habe da noch keine Ahnung. Alles andere habe ich soweit richtig.

Kann dein Programm noch irgendetwas anderes, etwas zusätzliches, was man noch machen kann um Eindruck zu schinden? Wenn ja kannste mir ja mal ein paar Vorschläge machen. :whistle: Danke schonmal

MFG

Nobody85 · « **Reply #5 on:** June 09, 2006, 03:56:17 pm »

Quote

Originally posted by Master3@8.6.2006 - 16:45
Wenn jemand Hilfe braucht bei dem Programm, steh ich gern zur Seite.
Habe es nun so gut wie fertig bzw. es ist fertig^^.

Hi könnte Hilfe gut gebrauchen.
Ich habe keine Ahnung, wie ich die Grafischeausgabe machen kann.
Mit anderen Worten, wie lasse ich die Paintbox Funktionen (Taylorpolynom)
Zeichnen.

Master3 · « **Reply #6 on:** June 09, 2006, 08:55:01 pm »

Also das Taylorpolynom habe ich in einer funtion deklariert,welches ich dann in der eigentlichen Prozedur aufrufen kann.

So sieht diese aus

Function Taylor(c, b: real; n:Integer):real;
var i : Integer;
begin;
result := 0;
For i := 0 To n do begin;
result := result + (power(c-b,i) / fakultaet(i));
end;
result := Exp(x0) * result;
end;

Hier wird diese allgemein festgelgt. Die Summenbildung kommt durch result + der Funktion zu Stande.

x := (-5+(8/500)*0);
u := round(Taylorpolynom2(x,a,n) * (500/8));

In der Prozedur muss man dann ein Startwert festlegen, wo es anfangen soll zu rechnen bzw. auch zu zeichnen.

In einer For to do Schleife wird dann für alle Pixel die Werte y und x berechnet.

In dieser sollte dann sowas stehen:
x := (-5+(8/500)*i);
y := round(Taylor(c,a,n) * (500/8));
Paintbox1.Canvas.MoveTo(i-1,250-oldy);
paintbox.Canvas.LineTo(i,250-y);
oldy := y;

Je nachdem wie groß die Paintbox ist muss man die Werte noch variieren. Bei mir ist sie 500*500 Pixel groß.

MasterSID · « **Reply #7 on:** June 09, 2006, 10:34:47 pm »

Quote

Originally posted by Master3@9.6.2006 - 20:55
Je nachdem wie groß die Paintbox ist muss man die Werte noch variieren. Bei mir ist sie 500*500 Pixel groß.

Warum machst du dir das so umständlich mit dem 500*500 Pixel. Sag doch einfach das u und v (oder irgendwelche integervariablen) clientwidth bzw. clientheight sein sollen. Das geht doch viel besser. Dann kannst du sogar ohne Probleme deine Paintbox in der Größe ändern, musst aber dann aufpassen, dass du deine x und y Werte für die Achsen wieder richtig umrechnest.

Was war eigentlich mit meiner Frage zu den Records??? Kannste mir das weiterhelfen? :innocent:

MFG

Master3 · « **Reply #8 on:** June 10, 2006, 12:34:56 pm »

@Master Sid
Schau mal in deiner PN-Box nach.

Das mit der Größe der Paintbox kann man mit Variablen machen, aber da man ja ein Formular gestalten will wo alles sitzen muss ist es von Vorteil eine feste Größe zu nutzen.

MasterSID · « **Reply #9 on:** June 10, 2006, 04:12:05 pm »

Ich danke dir, ich werd mich gleich mal damit befassen.

MFG

Nobody85 · « **Reply #10 on:** June 12, 2006, 02:07:59 pm »

Hi,
Master3 danke für den Tip mit der Paintbox.
Habe aber auch noch das Problem, was angesprochen wurde, mit den Records.
Habe zwar schonmal was von Records gehört, aber kann mir nicht vorstellen, was man da Von uns will, die einzelnen Taylorpolynome darin abzulegen.

Kann mir vielleicht jemand sagen, wie ich in meinem Formular so ne Richtig Schöne Formel als Einfache Textausgebe (TLabel) erstellen kann.

VanGuetti · « **Reply #11 on:** June 15, 2006, 05:34:09 pm »

Quote

Originally posted by Master3@8.6.2006 - 17:45
Wenn jemand Hilfe braucht bei dem Programm, steh ich gern zur Seite.
Habe es nun so gut wie fertig bzw. es ist fertig^^.

coole sache dass du das schon fertig hast!!!

hab da echt probleme mit dem mist...
könntest du mir mal zeigen wie du dass mit der fakultät gemacht hast...

mit dem ganzen quelltext zeug kann ich noch ne so viel anfangen.

Danke...

MasterSID · « **Reply #12 on:** June 15, 2006, 07:24:29 pm »

Wie soll denn die Dokumentation über das Taylorpolynom aussehen. Was wird oder wurde verlangt? Habt ihr irgendwelche Hinweise darüber.
Angesprochen sind nicht nur, die die Testataufgabe 7 haben. Es wäre nicht schlecht, wenn schnell Antworten kämen, es eilt :whistle:

Danke

MFG

silentpunk · « **Reply #13 on:** June 22, 2006, 07:29:44 pm »

so, hier ist was zum rummeckern

MasterSID · « **Reply #14 on:** June 23, 2006, 10:05:22 pm »

Quote

Originally posted by silentpunk@22.6.2006 - 19:29
so, hier ist was zum rummeckern

Warum hast du kein Koordinatensystem genommen? So sieht man bei dir im 3. nichts. Die Variable X macht irgendwie nichts :blink: ? Sonst siehts gut aus, aber ich würde deine Paintbox qudratisch wählen. Sieht einfach besser aus.

MFG