[Nautilus]

Люди добрые, выручайте, пожалуйста.
Пытаюсь построить график

Код:

procedure TForm1.Button4Click(Sender: TObject);
var
i : integer;
x, y : real;
begin
x := 50.2;
y :=0.3;
for i := 0 to 100 do
begin
x := x + i;
y := sin(x*3.14);
chart1.Series[0].AddXY(x,y);
end;
end;

и на жирной строке он ругается "Value assigned to 'y' never used"
как только не крутил y :=0.3... что это может быть ???
Спасибо небезразличным...