program nestedloop;


var NUM, a, b, c, d, e, f, x : Cardinal;
    code: integer;
begin
  NUM :=1;
  if (ParamCount=1) then Val(ParamStr(1),NUM,code);

  x := 0;
  for a:=1 to NUM do
    for b:=1 to NUM do
      for c:=1 to NUM do
        for d:=1 to NUM do
          for e:=1 to NUM do
            for f:=1 to NUM do
              inc(x);
  WriteLn(x);
end.