program water; var x, y, r2:real; t: real; {const pi = 3.1415926535; } begin repeat readln(x, y); if (x<>0) or (y<> 0) then begin r2 := sqr(x) + sqr(y); t := pi*r2/100; writeln('The property will be flooded in hour ', round(t+0.5),'.'); end; until (x=0) and (y=0); end.