m:-readln([A,B,C]),L=(A*C/B)^0.5,format("~0f ~0f ~0f ",[L,A/L,C/L]),m.