fork download
copy 
  1. procedure main()
  2. 	ai := read() 
  3. 	d := 50
  4. 	a :=  reverse(ai[1:d+1])
  5. 	b := reverse(ai[d+1:d*2+1])
  6. 	s := 0
  7.  
  8. 	every i := 1 to d do {
  9. 		s *:= 2
  10. 		s +:= a % 10
  11. 		a /:= 10
  12. 	}
  13. 	every i := 1 to d do {
  14. 		s *:= 2
  15. 		s +:= b % 10
  16. 		b /:= 10
  17. 	}
  18. 	write(s)
  19. end1000010010100101000100011110111100100010110101010001000101010110001111101111001100101101010100100111
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
File prog.icn; unexpected end of file
1 error;
stdout
copy 
Standard output is empty
https://ideone.com/uFVOLi
language:
Icon (iconc 9.5.1)
created:
8 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!