Вычислить произведение первых 10 натуральных чисел.Паскаль,помогите срочно!

Question

Вычислить произведение первых 10 натуральных чисел.Паскаль,помогите срочно!

Answer 1

Var i:integer;

bagin

for i:=1 to 10 do

begin

i:=i*i;

i:=i+1

end;

end.

 

откомпилируй код, скажи где ошибка если что