数字螺旋对角线
作者:Shlomi Fish
http://projecteuler.net/problem=28
从数字 1 开始,按顺时针方向移动,形成一个 5 x 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 x 1001 螺旋中,对角线上的数字之和是多少?
源代码: prob028-shlomif.pl
use v6; my Int $sum = 0; my Int $num = 1; $sum += $num; for 2, 4 ... 1000 -> $step { for 0 .. 3 { $num += $step; $sum += $num; } } say $sum;