diff options
| author | 冯昶 <fengchang@novel-supertv.com> | 2021-02-22 17:45:14 +0800 |
|---|---|---|
| committer | 冯昶 <fengchang@novel-supertv.com> | 2021-02-22 17:45:14 +0800 |
| commit | 572994875f5972916deabeb84f3648ac4640107b (patch) | |
| tree | 1458cfc22c7b80dd025415f73e7c808814bb0db7 /challenge-003/abigail/lua/ch-1.lua | |
| parent | 7021a6ee78be5c0a1bc1a30db583004a88fc7a15 (diff) | |
| parent | 2c26164a5a90aa14a19078d845769d3ec9fbb5ae (diff) | |
| download | perlweeklychallenge-club-572994875f5972916deabeb84f3648ac4640107b.tar.gz perlweeklychallenge-club-572994875f5972916deabeb84f3648ac4640107b.tar.bz2 perlweeklychallenge-club-572994875f5972916deabeb84f3648ac4640107b.zip | |
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'challenge-003/abigail/lua/ch-1.lua')
| -rw-r--r-- | challenge-003/abigail/lua/ch-1.lua | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/challenge-003/abigail/lua/ch-1.lua b/challenge-003/abigail/lua/ch-1.lua new file mode 100644 index 0000000000..70de9b1923 --- /dev/null +++ b/challenge-003/abigail/lua/ch-1.lua @@ -0,0 +1,30 @@ +#!/opt/local/bin/lua + +-- +-- See ../README.md +-- + +-- +-- Run as: lua ch-1.lua < input-file +-- + +for max in io . lines () do + local max = tonumber (max) + local base2 = 1 + -- + -- Lua doesn't have a for (expr; expr; expr) syntax. + -- This is missed here. + -- + while base2 <= max do + local base3 = base2 + while base3 <= max do + local base5 = base3 + while base5 <= max do + print (base5) + base5 = base5 * 5 + end + base3 = base3 * 3 + end + base2 = base2 * 2 + end +end |