Hallo ! Ich schreibe zurzeit in Lazarus ein Programm zur Untersuchung von einer quadratischen Funktion der Form ax^2+bx+c=0.
Diese will ich nun auch zeichnen lassen mit der TChart Komponente.
hier mein Quelltext:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14:
| procedure TForm1.FormCreate(Sender: TObject); const N = 100; MIN = -10; MAX = 10; var i: Integer; x: Double; f:=a*(x*x)+b*x+c; begin for i:=0 to N-1 do begin x := MIN + (MAX - MIN) * i /(N - 1); Chart1LineSeries1.AddXY(x, f(x)); end; |
Mein Problem: Wie lege ich f als Funktion fest? Ich gebe in mein Programm eigentlich nur a,b und c ein und hab vorher ausschließlich damit gearbeitet.
Hilfe wäre dringend angebracht und ich danke jeder Anregung !!
Moderiert von Narses: Delphi-Tags hinzugefügt