m:-readln([X,Y]),format("~2f
",sqrt(X^2+Y^2)),m.