m:-between(3,100,A),between(3,5000,B),C=sqrt(A*A+B*B),D=floor(C),C=:=D,\+format("~d ~d ~d~n",[A,B,D]).