Program obliczający belke - drobna pomoc.

Witam mam mały problem przy pisaniu programu który oblicza funkcje ugięcia belki dwu punktowo zamocowanej, przy czym niezbędne jest użycie całkowania metodą simpsona. I teraz moje pytanie mam wykres momentu, który robię w komponencie chart i tutaj pojawia się problem. Po podaniu zmiennych x,y wykres rysuje się ok do momentu gdy ostatnia zmienna ma postać 4;-10 ale wyświetlana jest jakoś 4;0. Zmienne do wykresu podane są ok bo w stringgrid wyświetlane są w sposób poprawny, czy ktoś może mi jakoś z tym pomóc? Ewentualnie też z dalszą częścią programu?

Błąd masz w 176 linijce

Tutaj część kodu odpowiedzialna za wykres:

 
procedure TForm2.Wykres1Click(Sender: TObject);
var
   i:integer;
begin
n:=StrToInt(Edit5.Text)+1;
with Form3 do
begin
with Chart1 do
begin
series1.Clear;
Title.Text.Clear;
Title.Text.Add('Wykres funkcji M(x)');
 Legend.Visible:=false;
 //BottomAxis.Automatic := false;
// BottomAxis.SetMinMax(h[1]-10, h[n]+10);
//LeftAxis.Automatic := false;
//LeftAxis.AutomaticMaximum := false;
//LeftAxis.AutomaticMinimum := false;
//LeftAxis.SetMinMax(Mxt[n]-10, Mxt[1]+10);
LeftAxis.Title.Caption:='M(x)';
BottomAxis.Title.Caption:='h';

        for i := 0 to n-1 do
          begin
          series1.AddXY(h[i], Mxt[i]);
        end;


Form3.Show;
end;
end;

end;