比赛代码 - COGS

比赛	20110728	评测结果	WWWWWWWWWW
题目名称	汉诺塔	最终得分	0
用户昵称	ybh	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2011-07-28 09:58:08

显示代码纯文本

program ionah;
var
  n,m,p,d,a,ans:int64;
begin
  assign(input,'ionah.in');
  reset(input);
  assign(output,'ionah.out');
  rewrite(output);
  
  readln(n,m);
  p:=(m-1) div (n-2);
  d:=(m-1)-p*(n-2);
  a:=1;
  a:=(a shl p)-1;
  ans:=(n-2-d)*a;
  a:=a*2+1;
  ans:=ans+d*a;
  ans:=ans*2+1;
  writeln(ans);
  
  close(input);
  close(output);
end.