m:-readln([A,B]),format("~0f
",((4*A*A+3*B*B)^0.5-A)/3),m.