Составить циклический процесс определения произведения натуральных чисел (факториал) 1*2*3  *n, для произвольного    n  (n!)

план работы.
1. условие задачи
2.математическая модель 
3.список переменных с их расшифровкой 
4.блок-схема алгоритма 
5.программный код

1. Есть 2. 3. n - заданное число, y - факториал числа, i - счётчик4. Прил.5. var  y: System.uint64; //Большая цифра же и положительная  n, i: byte; //Нет смысла большие числа брать слишком, переполнение будетbegin  readln(n); //Принимаем число...  y := 1;  i := 1;  repeat    y := y * i; //...и умножаем такое-то количество раз    i := i + 1;  until i > n;  if (y = 0) then //Выводим, предусмотрев переполнение    writeln('Слишком большая цЫферка')  else    writeln(y);end.