Forum: Object-Pascal / Delphi-Language
Delphi
by tobiasw,
2. Dez 2004
hier die Lösung zu meinem Problem
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Forum: Object-Pascal / Delphi-Language
Delphi
by tobiasw,
1. Dez 2004
also das ganze ist ja ne Geradengleichung durch den Nullpunkt
Die Formel für a1 wird berechnent mit gu*go-gu/3, a2=(gu+go-gu/3)*go-gu/3 und und a3=(gu+2*go-gu/3)*go-gu/3.
mein Prozedure würde so aussehen (die erste zeile denn weiter weiß ich net)
proceddure flaeche (a3,a2,a1,a0,ug,og:double; var ergebnis:double);
Gruß
Forum: Object-Pascal / Delphi-Language
Delphi
by tobiasw,
1. Dez 2004
hi,
brauche unbedingt eure Hilfe denn ich komm nicht mehr weiter. Ich soll ein Prog schreiben welches für ein Polynom von Grad kleiner oder Gleich 3 die Fläche unter der Kurve in einem bestimmten Intervall nach der Rechtekregel berechnet.
Mein Prozedur sieht schon mal so aus.
procedure fläaeche (a3,a2,a1,a0,ug,og:double; var ergebnis:double);
Ug und Og sind die untere und obere Grenze
...