Result

WA

Code [DL]

00000000  71 7a 22 61 78 22 62 78  22 63 78 22 64 78 22 65  |qz"ax"bx"cx"dx"e|
00000010  78 22 66 78 22 67 78 22  68 73 12 3d 40 61 2a 31  |x"fx"gx"hs.=@a*1|
00000020  32 38 2b 40 62 2a 36 34  2b 40 63 2a 33 32 2b 40  |28+@b*64+@c*32+@|
00000030  64 2a 31 36 2b 40 65 2a  38 2b 40 66 2a 34 2b 40  |d*16+@e*8+@f*4+@|
00000040  67 2a 32 2b 40 68 0d 0a  1b 63 63 12 3d 70 6f 77  |g*[email protected].=pow|
00000050  28 66 6c 6f 6f 72 28 73  71 72 74 28 40 40 2a 38  |(floor(sqrt(@@*8|
00000060  2b 31 29 29 2c 32 29 3d  3d 40 40 2a 38 2b 31 0d  |+1)),2)==@@*8+1.|
00000070  0a 1b 6a 5e 71 34 39 40  7a 5a 5a 0d 0a           |..j^q49@zZZ..|
0000007d

Disassembly

qz"ax"bx"cx"dx"ex"fx"gx"hs<C-R>=@a*128+@b*64+@c*32+@d*16+@e*8+@f*4+@g*2+@h<CR><NL><Esc>cc<C-R>=pow(floor(sqrt(@@*8+1)),2)==@@*8+1<CR><NL><Esc>j^q49@zZZ<CR><NL>

stdin

01011111
00000011
00110111
01111001
00101101
10111001
10010100
10011000
00001111
11100001
11100111
00000000
11111101
10000000
00000110
11100101
01101001
00011100
01000110
10001000
00000001
01011011
10001111
00101100
01001110
01001100
01111100
10011001
10010101
00010101
10101011
01111000
01110110
01111101
10100111
00001010
11101010
00100100
10100001
10000101
10001000
11101101
10111110
01111000
00100000
10010111
11011010
10001001
11010010
01000010

stdout

95
1

3
1

55
1

121
1

45
1

185
1

148
1

152
1

15
1

225
1

231
1

0
1

253
1

128
1

6
1

229
1

105
1

28
1

70
1

136
1

1
1

91
1

143
1

44
1

78
1

76
1

124
1

153
1

149
1

21
1

171
1

120
1

118
1

125
1

167
1

10
1

234
1

36
1

161
1

133
1

136
1

237
1

190
1

120
1

32
1

151
1

218
1

137
1

210
1

66
1

stderr

strace