11 lines
250 B
Text
11 lines
250 B
Text
pythag = fn (N) {
|
|
[(A, B, C) for A in lists.seq(1, N) \
|
|
for B in lists.seq(A, N) \
|
|
for C in lists.seq(B, N) \
|
|
if A + B + C <= N and A * A + B * B == C * C]
|
|
}
|
|
|
|
@public
|
|
run = fn () {
|
|
io.format("~p~n", [pythag(20)])
|
|
}
|