var x,y:real; begin writeln ('Ââåäèòå êîîðäèíàòû òî÷êè (x,y)'); readln (x,y); if (x=0) and (y=0) then writeln ('0') else if (x=0) or (y=0) then writeln ('1') else writeln ('2'); end.