Вычислить произведение n-сомножителей P=1*2*3.......*10=10!
Вычислить произведение n-сомножителей P=1*2*3.......*10=10!
Гость
Ответ(ы) на вопрос:
Гостьvar i,p,n:integer;
begin
p:=1;
readln(n);
for i:=1 to n do
p*=i;
writeln(p);
end.
Не нашли ответ?
Похожие вопросы