$n=<>; ($c,$v)=glob<>; $e=9e99; sub f{ my($a,$b,$o)=@_; if($o>$e){ }elsif($a>=$n){ $e=$o; }else{ if($a!=$b){ f($a,$a,$o+$c); } f($a+$b,$b,$o+$v); } } f(1,0); print $e;