написать программу которая находит произведение n первых натуральных чисел . число n вводится с клавиатуры. выполнить программу для n=9 записать результат.

спасибо

cont n=9;var i,p:integer;beginp:=1;for i:=1 to n do p:=p*i;writeln("Произведение первых ",n," чисел = ",p);end.