记录编号	2584	评测结果	AAAAWWWWWA
题目名称	[NOIP 2007]Hanoi双塔问题	最终得分	50
用户昵称	0彼岸0	是否通过	未通过
代码语言	Pascal	运行时间	0.001 s
提交时间	2008-09-22 22:31:48	内存使用	0.11 MiB

program lanlan;
var n:integer;
    an:longint;

procedure hanoi(var n:integer);
var i: integer;
     begin
         an := 1;
         for i:=1 to n+1 do an := an * 2;
         an := an - 2;
     end;
begin
    assign(input, 'hanoi.in');
    assign(output, 'hanoi.out');
    reset(input);
    rewrite(output);
    read(input, n);
    hanoi(n);
    write(output, an);
    close(input);
    close(output);
end.