아래와 같은 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]; |