Funkcja kwadratowa

0

Czesc forumowicze :P !
Mam ptanie - w jaki sposob narysowac wykres funkcji kwadraowj (ax^2+bx +c) ?? probowalem zrobic petle ktora wylicza kolejne y, ale ty chyba jednak nie to ....

0

Czesc forumowicze :P !
Mam ptanie - w jaki sposob narysowac wykres funkcji kwadraowj (ax^2+bx +c) ?? probowalem zrobic petle ktora wylicza kolejne y, ale ty chyba jednak nie to ....

robi sie tak
x1 = jakas wartosć
x2 = jakas wartosc
np x1:=-100
x2:= 100
for i := x1 to x2 do
canvas.putpixel(i,aii+b*i+c) i masz na ekranie, tylko nie zapomnij ustawic PENa, na odpowiedni kolor np clRed

0

wiem ze moze jestem amatroem ..ale putpixel nie dziala ... probowalem tez uzyc pixels .ale nie dalo rady ...

0

const
OffX = 200;
OffY = 200;
a = 0.01;
b = -2;
c = 10;
var
i, x, y: Integer;
begin
Canvas.MoveTo(0, OffY);
Canvas.LineTo(Form1.Width, OffY);
Canvas.MoveTo(OffX, 0);
Canvas.LineTo(OffX, Form1.Height);
x := -100;
y := Trunc(axx + bx +c);
Canvas.MoveTo(OffX+x, OffY-y);
for i := 0 to Form1.Width do
begin
Inc(x);
y := Trunc(a
xx + bx +c);
Canvas.LineTo(OffX+x, OffY-y);
end;
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1