RosettaCodeData/Task/Bernoulli-numbers/SPAD/bernoulli-numbers.spad
2023-07-01 13:44:08 -04:00

1 line
69 B
Text

for n in 0..60 | (b:=bernoulli(n)$INTHEORY; b~=0) repeat print [n,b]