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 2024-03-06 22:25:12 -08:00
parent ed705008a8
commit 0df55f9f24
2196 changed files with 32999 additions and 3075 deletions
Download patch file Download diff file Expand all files Collapse all files

9
Task/Untouchable-numbers/Wren/untouchable-numbers-1.wren
View file

@ -1,6 +1,5 @@
import "/math" for Int, Nums
import "/seq" for Lst
import "/fmt" for Fmt
import "./math" for Int, Nums
import "./fmt" for Fmt
var sieve = Fn.new { |n|
n = n + 1
@ -23,9 +22,7 @@ while (n <= limit) {
}
System.print("List of untouchable numbers <= 2,000:")
for (chunk in Lst.chunks(untouchable.where { |n| n <= 2000 }.toList, 10)) {
Fmt.print("$,6d", chunk)
}
Fmt.tprint("$,6d", untouchable.where { |n| n <= 2000 }, 10)
System.print()
Fmt.print("$,6d untouchable numbers were found <= 2,000", untouchable.count { |n| n <= 2000 })
var p = 10

9
Task/Untouchable-numbers/Wren/untouchable-numbers-2.wren
View file

@ -1,6 +1,5 @@
import "/math" for Int, Nums
import "/seq" for Lst
import "/fmt" for Fmt
import "./math" for Int, Nums
import "./fmt" for Fmt
var limit = 1e6
var m = 63
@ -26,9 +25,7 @@ while (n <= limit) {
n = n + 2
}
System.print("List of untouchable numbers <= 2,000:")
for (chunk in Lst.chunks(untouchable.where { |n| n <= 2000 }.toList, 10)) {
Fmt.print("$,6d", chunk)
}
Fmt.tprint("$,6d", untouchable.where { |n| n <= 2000 }, 10)
System.print()
Fmt.print("$,7d untouchable numbers were found <= 2,000", untouchable.count { |n| n <= 2000 })
var p = 10