$N=<>; ($C,$V)=glob<>; for$i(1..$N-1){ for($j=1;$i+$j*$i<=2*$N;++$j){ $d[$i+$j*$i]-=$-=($d[$i+$j*$i]||=1e9)-($d[$i]+$C+$V*$j); } } $%=1e9; $%-=$-=$%-$d[$_]for$N..2*$N; print$%