Напишите программу алгоритм который по введенному числу n(1_< __< 10) вычислит и напечатает значение n! =1*2*3**n

Program test;
Var
n, i,a:integer;
Begin
Write( 'введите число: ');
readln(n);
for i:=1 to n do a:=a*n;
write(n,'!= ',a);
End.

Есте́ственный язы́к — в лингвистике и философии языка язык, используемый для общения людей (в отличие от формальных языков и других типов знаковых систем, также называемых языками в семиотике) и не созданный целенаправленно (в отличие от искусственных языков).

Формальный язык в математической логике и информатике — множество конечных слов (строк, цепочек) над конечным алфавитом. Понятие языка чаще всего используется в теории автоматов, теории вычислимости и теории алгоритмов. Научная теория, которая имеет дело с этим объектом, называется теорией формальных языков.

Перевод 53B  в десятичную систему:
Для этого вспомним, что справа идёт разряд единиц (единица в этом разряде- означает единицу в числе.  т.е. вес разряда = = 1).
Вес каждого следующего разряда левее разряда единиц-  будет в 16 раз больше веса предыдущего разряда (т.е.  , ,  итд... ).
Поэтому, перевод в десятичную систему выполняется умножением веса каждого разряда на содержимое разряда (буквы соответствуют значениям: A=10, B=11, C=12, D=13, E=14, F=15 ), и результаты складываем:
53B =  

Перевод 274,259  в десятичную систему:
Переводим точно так же, только основание системы здесь равно восьми. Вес каждого следующего разряда левее разряда единиц-  будет в 16 раз меньше веса предыдущего разряда (т.е.  , ,  итд... ).
274,259 =   

Сложение чисел 574 и 230  в восьмеричной системе:
Выполняем столбиком, как в десятичной системе, но при этом если в десятичной перенос в следующий разряд происходил при сумме по разряду больше или равной десяти, то в восьмеричной- при сумме больше или равной восьми:
  574
+230
--------
1024

Опишу подробнее процесс сложения:
-в младшем разряде: 4 + 0 = 4
-во втором разряде: 7 + 3 = 10
Далее, раз значение больше или равно восьми, то переносим единицу в следующий разряд, а из текущего разряда- нужно отнять восемь (ведь единица следующего разряда весит в восемь раз больше): 10 - 8 = 2   (записываем эту двойку во второй разряд)
-в третьем разряде: 5 + 2 + 1(это единица с предыдущего разряда) = 8
У нас опять нужно перенести единицу в следующий разряд, а из этого вычесть восемь:  8 - 8 = 0   (записываем ноль в третий разряд)
-в четвёртом разряде: записываем ту единицу, которую перенесли с третьего.