Result

WA

Code [DL]

00000000  71 79 22 61 64 30 73 12  3d 40 61 2a 32 2b 40 40  |qy"[email protected]*[email protected]@|
00000010  0a 1b 71 71 7a 6c 38 40  79 22 62 63 63 12 3d 66  |[email protected]"bcc.=f|
00000020  6d 6f 64 28 73 71 72 74  28 40 63 2a 38 2b 31 29  |mod(sqrt(@c*8+1)|
00000030  2c 31 29 3d 3d 30 0a 1b  6a 5e 71 34 39 40 7a 5a  |,1)==0..j^[email protected]|
00000040  5a 0a                                             |Z.|
00000042

Disassembly

qy"ad0s<C-R>[email protected]*[email protected]@<NL><Esc>[email protected]"bcc<C-R>=fmod(sqrt(@c*8+1),1)==0<NL><Esc>j^[email protected]<NL>

stdin

10000110
11001001
01110111
10101010
11001110
01101001
10101011
00000110
00000001
01010111
10000011
01111000
10001000
00100100
00011100
11110110
11110100
00101101
11111010
00100100
00110111
01110001
01101111
01100101
01011011
00000011
00110000
01001110
11100111
11010010
11111110
00001010
00000000
00001111
10011001
11111101
01010100
01000010
01000101
11101101
11100110
01111010
01011101
11100001
10111110
01111000
10000000
11100100
01001011
00010101

stdout

1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1

stderr

strace