BANGDX648 PASCAL

var x,y,d:longint;
begin
    assign(input,'bangdx648.inp');reset(input);
    assign(output,'bangdx648.out');rewrite(output);
    readln(x,y);
    d:=abs(x-3) + abs(y-3);
    write(d);
end.