whitespace, 191 bytes

Result [link]

AC

Code [DL]

Disassembly

     push 100
     push 1
     swap
     set
     push 0
     push 2
     swap
     set
part "A"
     push 2
     get
     push 2
     mul
     push 0
     ichr
     push 0
     get
     push 48
     sub
     add
     push 2
     swap
     set
     push 1
     get
     push 1
     sub
     copy
     push 1
     swap
     set
     push 0
     swap
     sub
     less "A"
     push 2
     get
     oint
     exit

stdin

0100010101000010111110111100011110110011011011101010110010000101110010000011001101001010011001000010

stdout

342967100473377719800105838146

stderr

strace