aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2023-12-16 21:33:55 -08:00
parent 35bcdeebf8
commit 74c69a0df6
2427 changed files with 31826 additions and 3468 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Task/Lah-numbers/Wren/lah-numbers.wren
View file

@ -1,4 +1,4 @@
import "/fmt" for Fmt
import "./fmt" for Fmt
var fact = Fn.new { |n|
if (n < 2) return 1
@ -17,10 +17,10 @@ var lah = Fn.new { |n, k|
System.print("Unsigned Lah numbers: l(n, k):")
System.write("n/k")
for (i in 0..12) System.write("%(Fmt.d(10, i)) ")
for (i in 0..12) Fmt.write("$10d ", i)
System.print("\n" + "-" * 145)
for (n in 0..12) {
System.write("%(Fmt.d(2, n)) ")
for (k in 0..n) System.write("%(Fmt.d(10, lah.call(n, k))) ")
Fmt.write("$2d ", n)
for (k in 0..n) Fmt.write("$10d ", lah.call(n, k))
System.print()
}