var n,k: integer;
    x,t:real;
begin
    read(n,k);
    x:=n/k;
    if (Frac(x)>0)
      then
        if (Frac(x)>0.5)
          then
            t:=(trunc(x)+1)*2
          else
            if (trunc(x)=0)
              then
                t:=2
              else
                t:=trunc(x)*2+1
      else
          t:=x*2;
    writeln('t=',t);
end.