Найти произведение чисел 1*3*5*7 их произведение равно 105 написать эту програму в Pascal

спасибо огромное

var a, sum: real;var i: integer;beginsum:=1;a:=1;for i:=1 to 3 do begin a:=a+2; sum:=a*sum; end;writeln (sum);end.