Задание

Выберите функцию, которая вычисляет рекуррентное соотношение:

function f(n: Integer): Integer;

var

Fib: array[0..n] of Integer;

i: Integer;

begin

Fib[0] := 0;

Fib[1] := 1;

for i := 2 to n do

Fib[i] := Fib[i-1] + Fib[i-2];

f := Fib[n];

end;

function f(n: Integer): Integer;

begin

if n = 0 then

f := 0

else if n = 1 then

f := 1

else if n = 2 then

f := 2

else

f := n * 2;

end;

function f(n: Integer): Integer;

begin

f := n * n + 3 * n + 5;

end;