记录编号	27068	评测结果	AAAAAAAAAA
题目名称	翻硬币	最终得分	100
用户昵称	lizhe	是否通过	通过
代码语言	Pascal	运行时间	0.001 s
提交时间	2011-08-01 09:25:20	内存使用	0.12 MiB

 program xcoins;
const
  f:array[5..15]of int64=(1,6,3,4,3,2,3,4,3,4,3);
var
  n,t:int64;
begin
  assign(input,'xcoins.in');
  reset(input);
  assign(output,'xcoins.out');
  rewrite(output);
  read(n);
  if n<=15 then
    writeln(f[n])
  else
  begin
    t:=f[n mod 5+10]+(n-n mod 5-10) div 5;
    writeln(t)
  end;
  close(input);
  close(output)
end.