помогите пожалуйста в Delphy)

Question

1. написать приложение в Delphy для вычисления с помощью примитивной рекурсии значений этой функции 
2. Решить эту задачу с помощью хвостовой рекурсии 
3. В одной из программ (1 или 2) организовать вычисление и пошаговый вывод промежуточных результатов с применением косвенной рекурсии

Sergei Studenikin · Accepted Answer

n:=3; 
a:=2; 
for i:=2 to n do 
a:=a*2; 
f:=1/a;