Var a, R : integer; Function F(x : integer) : integer; begin if x меньше = 0 then F:=0 else F:=x+ F(x-2); end; begin a:=8; R:=F(a); write(R); end. В паскале ответ 20, как он получается? объясните поподробнее

Question

Var a, R : integer; Function F(x : integer) : integer; begin if x меньше = 0 then F:=0 else F:=x+ F(x-2); end; begin a:=8; R:=F(a); write(R); end. В паскале ответ 20, как он получается? объясните поподробнее

Var a, R : integer; Function F(x : integer) : integer; begin if x<= 0 then F:=0 else F:=x+ F(x-2); end; begin a:=8; R:=F(a); write(R); end. В паскале ответ 20, как он получается? объясните поподробнее

Гость

Ответ(ы) на вопрос:

Accepted Answer

рекурсия F = 8 + 6 + 4 + 2 = 20 когда зашли за 0 рекурсия останавливается