Numbers with same digit set in base 10 and base 16: Difference between revisions

Content added Content deleted
(Added Easylang)
Line 982: Line 982:
=={{header|langur}}==
=={{header|langur}}==
{{trans|Python}}
{{trans|Python}}
<syntaxhighlight lang="langur"># using hash keys to create a pseudo-set
<syntaxhighlight lang="langur">
# using hash keys to create a pseudo-set
val .makeset = fn .n: foldfrom fn(.h, .v) { .h ~ {.v: 0} }, {:}, split .n
val makeset = fn n:foldfrom(fn h, v: h ~ {v: 0}, {:}, split(n))


var .col = 1
var col = 1
for .n in 0 .. 99999 {
for n in 0 .. 1000 { # 99999 {
if .makeset(.n) == .makeset(string .n, 16) {
if makeset(n) == makeset(string(n, 16)) {
write "{{.n:7}}"
write "{{n:7}}"
if .col div 10: writeln()
if col div 10: writeln()
.col += 1
col += 1
}
}
}
}