n,r,u:integer;
procedure ChetN;
var
Shet:integer;
begin
Shet:=0;
repeat
n:=n div 2;
Shet:=Shet+u;
until n=1;
writeln(Shet);
end;
procedure NechetN;
var
Shet:integer;
begin
if n=3 then begin Shet:=u*3; writeln(Shet); exit; end;
Shet:=u*2+r;
writeln(Shet);
end;
begin
readln(n,r,u);
if n mod 2=0 then ChetN
else NechetN;
readln;
end.