подскажите. о паскале

Вот задача, я ее решил, но мне нужно узнать как ее можно решить без использования переменной v, это рекурсия. Буду премного благодарен

FUNCTION sq(n, v: integer): real;
begin
if n = 0 then sq:=0
else sq:=sqrt(n+sq(n-1,v*2));
end;
VAR s: real;
BEGIN
s:=sq(4,2);
writeln('S=', s);
END.