Question

Scrie un program utilizand un subprogram recursiv care calculeaza suma S(n)=2+4+6+8...+2n (Pascal)

Answer 1

Răspuns:

program sumaParelorRecursiv;

var n:integer;

function SPare(n:integer):integer;

begin

 if (n=0) then SPare:=0

 else SPare:=(2*n)+SPare(n-1);

end;

begin

 write('n='); read(n);

 writeln(SPare(n));

end.

Explicație: