>>847
意味わからんぞぃ！
例えばのfはrでええんかぁ
んでn/4はリバースする前のnが4の倍数なんか？
4の倍数を利用しないブルートフォース版じゃが
n = 1;
While[n/4 != FromDigits[Reverse[IntegerDigits[n]]], n++];
Print[n]