记录编号 81645 评测结果 AAAAAAAAAA
题目名称 圣庙里的汉诺塔[HA-SY,COGS] 最终得分 100
用户昵称 GravatarTA 是否通过 通过
代码语言 Pascal 运行时间 0.000 s
提交时间 2013-11-16 16:21:16 内存使用 0.00 MiB
显示代码纯文本
var
 n,t,y:qword;
begin
 assign(input,'Hanoia.in');
 assign(output,'Hanoia.out');
 reset(input);
 rewrite(output);
 //while not(eof) do
  //begin
   readln(n);
   y:=2;
   t:=1;
   while n<>0 do
    begin
     if n and 1=1 then
       t:=t*y mod 999999997;
     y:=y*y mod 999999997;
     n:=n shr 1;
    end;
   writeln(t-1);
  //end;
 close(input);
 close(output);
end.