Eban numbers: Difference between revisions

m
→‎{{header|K}}: slightly simpler
(K)
m (→‎{{header|K}}: slightly simpler)
Line 1,405:
=={{header|K}}==
{{works with|ngn/k}}
<syntaxhighlight lang=K>eban: 1_{{{((y[&y<x+1]}[y]@)>)#,/x+/:1000*,/z}[,/(2*!4)+/:10*0,3+!4;x]/0}@
 
#eban 1000
6,962

edits