var i,t0,q,l:integer;
vet:array[1..11]of real;
begin
q:=2;
t0:=1;
l:=3;
chart1.Series[0].Clear;(*ti cancella la vecchia serie*)
(*al posto delle variabili m ho utilizato un vettore*)
vet[1]:=0;
vet[2]:=(t0 * (0.1*l)) - (q * (0.1*l) * (0.1*l)) / 2;
vet[3]:=(t0 * (0.2*l)) - (q * (0.2*l) * (0.2*l)) / 2;
vet[4]:=(t0 * (0.3*l)) - (q * (0.3*l) * (0.3*l)) / 2;
vet[5]:=(t0 * (0.4*l)) - (q * (0.4*l) * (0.4*l)) / 2;
vet[6]:=(t0 * (0.5*l)) - (q * (0.5*l) * (0.5*l)) / 2;
vet[7]:=(t0 * (0.6*l)) - (q * (0.6*l) * (0.6*l)) / 2;
vet[8]:=(t0 * (0.7*l)) - (q * (0.7*l) * (0.7*l)) / 2;
vet[9]:=(t0 * (0.8*l)) - (q * (0.8*l) * (0.8*l)) / 2;
vet[10]:=(t0 * (0.9*l)) - (q * (0.9*l) * (0.9*l)) / 2;
vet[11]:=0;
(comunque questo pezzo potevi benissimo farlo con un ciclo for*)
for i:=1 to 11 do
chart1.Series[0].addxy(i,vet[i]);
end;

ecco qui..
spero sia quello che volevi...
se qualcosa non l'hai capita,basta che me lo chiedi...