# [Erlang (escript)], 68 bytes

<!-- language-all: lang-erlang -->

    f(X)->Y=lists:max([I||I<-lists:seq(1,X),X rem I==0,I*I=<X]),[Y,X/Y].

[Try it online!][TIO-ka7js03b]

[Erlang (escript)]: http://erlang.org/doc/man/escript.html
[TIO-ka7js03b]: https://tio.run/##JcixCsMgEADQPV/heFfOtIFMIWb3DxRxkGLKQUxTFdoh/24LfeOLeQv7Q8Zyz3zU1rUVDMrFqo1LLVMKH3D6PPUs/1HiCwYySEbkmIRW6kb6otVsPJKzZK7W9y0F3sF5FHLpxA8/p3fmGmGFYRwR@/YF "Erlang (escript) – Try It Online"