RosettaCodeData/Task/M-bius-function/Jq/m-bius-function-5.jq
2023-07-01 13:44:08 -04:00

12 lines
265 B
Text

def nwise($n):
def n: if length <= $n then . else .[0:$n] , (.[$n:] | n) end;
n;
def task:
def pp: if . >=0 then " \(.)" else tostring end;
"The first 199 Möbius numbers are:",
([" ", (range(1; 200) | mu | pp )]
| nwise(20)
| join(" ") ) ;
task