Welcome, guest! Login / Register - Why register?
Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)

Paste

Pasted by 123 ( 12 years ago )
program gg;

var
 
 a: integer;

Function lol(a: integer): integer;

 Begin

  If a = 4 then lol := 4
   else lol := 2 * lol(a div 2) + a;

 end;

Begin

 read(a);
 writeln(lol(a));

end.

 

Revise this Paste

Your Name: Code Language: