Skip to main content
deleted 8 characters in body
Source Link
Nahuel Fouilleul
  • 8.6k
  • 1
  • 10
  • 18

Perl 5, 4642 bytes

say for 1,(map 2+2*($x+=$x+2*$y++2**$_-$_),A1..Q17),"NOPE!"

Try it onlineTry it online

Perl 5, 46 bytes

say for 1,(map 2+($x+=$x+2*$y++),A..Q),"NOPE!"

Try it online

Perl 5, 42 bytes

say for 1,(map 2*(2**$_-$_),1..17),"NOPE!"

Try it online

edited body
Source Link
Nahuel Fouilleul
  • 8.6k
  • 1
  • 10
  • 18

Perl 5, 4746 bytes

say for 1,(map{$x+=$x+2*$y++;$x+2} 2+($x+=$x+2*$y++),A..Q),"NOPE!"

Try it onlineTry it online

Perl 5, 47 bytes

say for 1,(map{$x+=$x+2*$y++;$x+2}A..Q),"NOPE!"

Try it online

Perl 5, 46 bytes

say for 1,(map 2+($x+=$x+2*$y++),A..Q),"NOPE!"

Try it online

Source Link
Nahuel Fouilleul
  • 8.6k
  • 1
  • 10
  • 18

Perl 5, 47 bytes

say for 1,(map{$x+=$x+2*$y++;$x+2}A..Q),"NOPE!"

Try it online