-module a. -export[m/0]. m()->case io:fread('',"~d~d")of{_,[A,B]}->M=math,io:format("~p ",[round(M:pow(M:pow(A,2/3)+M:pow(B,2/3),1.5))]),m();_->0end.