>>943
プログラムに作図させて計算させて終わり。

https://i.imgur.com/cc0C0zS.png

f <- function(x){
floor(x^3)/floor(x)^3
}
curve(f(x), -10,10)
optimise(f,c(-10,10))
optimise(f,c(-10,10),maximum=T)