befunge98, 85 bytes

Result

WA

Code [DL]

v>:0g:84*-v
2^+1<>\1-v_@
1*  $,v :<
+8   :
:6   \
*^ < |<
>:!|^<
-v~<
1>:0g1v
^p0\+ <

stdin

3356485457932134701302409722492544278386029180224507234527106403703880144877719572800874322327992473

stdout

stderr

strace