RosettaCodeData/Task/Bernoulli-numbers/SPAD/bernoulli-numbers.spad
2016-12-05 23:44:36 +01:00

1 line
69 B
Text

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