아래와 같은 2 × 2 격자의 왼쪽 위 모서리에서 출발하여 오른쪽 아래 모서리까지 도달하는 길은 모두 6가지가 있습니다 (거슬러 가지는 않기로 합니다).
그러면 20 × 20 격자에는 모두 몇 개의 경로가 있습니까?
중학교때(?) 배웠던 기억을 되살려 풀었다.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
#!/usr/bin/env perl use 5.010; use strict; use warnings; my @a; for my $i (0..20) { for my $j (0..20) { if ($i == 0 or $j ==0) { $a[$i][$j] = 1; } else { $a[$i][$j] = $a[$i-1][$j] + $a[$i][$j-1]; } } } say $a[20][20]; |