aboutsummaryrefslogtreecommitdiff
path: root/challenge-140/abigail/awk/ch-2.awk
blob: 32372950cc7cdb2d82a026ef190277278d7073b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
#!/usr/bin/awk

#
# See ../README.md
#

#
# Run as: awk -f ch-2.awk < input-file
#

{
    i = $1
    j = $2
    k = $3

    n = 0
    while (k > 0) {
        n ++
        s = int (sqrt (n))
        for (d = 1; d <= s && k > 0; d ++) {
            if (!(n % d)) {
                k -= (d <= i && n / d <= j) + \
                     (d <= j && n / d <= i) - (n == d * d)
            }
        }
    }
    print (n)
}