procedure main() a := read() s := 0 while a > 0 do { s *:= 2 s +:= a % 10 a /:= 10 } write(s)end
0010101000000100111110000100111110100011110110001010110101110101101000111101110111111101111100000000
1218516676999112054511486997
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!