프로젝트 오일러 28번

  • 2013/09/14
  • Perl

숫자 1부터 시작해서 우측으로부터 시계방향으로 감아 5×5 행렬을 만들면 아래와 같이 됩니다.

21 22 23 24 25
20   7   8   9 10
19   6   1   2 11
18   5   4   3 12
17 16 15 14 13

여기서 대각선상의 숫자를 모두 더한 값은 101 입니다.

같은 방식으로 1001×1001 행렬을 만들었을 때, 대각선상의 숫자를 더하면 얼마가 됩니까?

두 가지 방법이 있겠다.
똑똑하게 계산해서 푸는 방법과 우직하게 달팽이 배열 만들어서 더하는 방법.
둘 모두 사용해봤다. 당연히 짧은 쪽이 현명한 방법이다.