# [Haskell], 65 bytes

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

 import System.Random
 f x=do n<-randomIO::IO Float;print$floor$n+x

[Try it online!][TIO-l0trvqg1]

[Haskell]: https://www.haskell.org/
[TIO-l0trvqg1]: https://tio.run/##y0gszk7Nyfn/PzO3IL@oRCG4srgkNVcvKDEvJT@XK02hwjYlXyHPRrcILODpb2Xl6a/glpOfWGJdUJSZV6KSlpOfX6SSp13xPzcxMw@omkshTcEUTOiRSxlCKEsQZQYkNAx0gXKapLP@AwA "Haskell – Try It Online"