Помогите на языке программирования Pascal необходимо написать код благодаря, которому юзер

Числа начинаются от единицы?

К примеру N = 5X = 1 * 2 * 3 * 4 * 5

Любое число которое введет пользователь, не считая единицы.

Если верхняя граница N не определена, то решение будет не таким обычным, как это может показаться.

Задачка школьная и в задании не было обращено никакого внимания на границы значения N. Скорее всего программа не будет употребляться для огромных вычислений.

Если будут введены огромные значения N, то можно поменять тип переменных на int64 либо поменять цикл for на while со счётчиком и поменять тип переменных на real

Но написать программу под хоть какое значение N не получится, т.к. у всех типов есть границы

Задачка нахождения факториала огромного числа - это классика. :-) Задачка решаемая и по собственному занимательная. Вопрос только в том, вправду-ли была поставлена конкретно эта задача, или фраза "Любое число которое введет юзер, кроме единицы" - это преувеличение?

program raf105;

var n,i,pro: integer;

begin

write('N = ');

readln(n);

pro:= 1;

for i:=1 to n do

begin

 write(i,' ');

 pro:= pro * i;

end;

writeln;

writeln('Творение: ',pro);

end.

PascalABC 3.4.2