Вопрос по программированию pascal вычислить значения многочлена 2a^5*3a^2-1.7a+12 для a=0,1,5,3,4,5,….10.5.

Program Algorithm;
uses crt;
var result, a:real;
begin
for a:= 0 to 10.5 do 
begin
result:=2*(Pow (a),5)*3*a*a-1/7*a+12;
a:=a+1.5;
writeline ("Your answer is ", result);
end;
end.

Как-то так, возможно не надо ставить begin/end в цикле for, потому что я уже не помню когда они нужны.