23/02/13 05:44:43.68 B/aZ5svqM.net
f=\(x) x %/% 10^floor(log10(x))
n=1:100
n[sapply(n,\(x) f((1000+x)^10))==2][1]
23/02/13 05:44:43.68 B/aZ5svqM.net
f=\(x) x %/% 10^floor(log10(x))
n=1:100
n[sapply(n,\(x) f((1000+x)^10))==2][1]
23/02/13 05:44:43.68 B/aZ5svqM.net
f=\(x) x %/% 10^floor(log10(x))
n=1:100
n[sapply(n,\(x) f((1000+x)^10))==2][1]