Найдите произведение натуральных чисел от 1 до n ( с помощью алгоритма )    

Найдите произведение натуральных чисел от 1 до n ( с помощью алгоритма )    
Гость
Ответ(ы) на вопрос:
Гость
var prod,i,N:int; begin    readln(N);    prod:=1;    for i:=1 to N do       prod:=prod*i;    writeln(prod) end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы