[FlyInDream]

Правильное а1 это:
a1 := (2*L/X - (i * (X - 1)))/2;
И вот тогда и с L проблем не будет.

P.S. Просчитался я. Ваша формула тоже верна, только вместо div надо обычное деление делать.