Stirling numbers of the first kind: Difference between revisions
Stirling numbers of the first kind (view source)
Revision as of 08:32, 20 September 2023
, 9 months agoEasylang
(Easylang) |
|||
Line 471:
19710908747055261109287881673376044669240511161402863823515728791076863288440277983854056472903481625299174865860036734731122707870406148096000000000000000000
(158 digits, k = 5)</pre>
=={{header|EasyLang}}==
<syntaxhighlight lang="easylang">
print "Unsigned Stirling numbers of the first kind:"
arrbase a[] 0
arrbase b[] 0
len a[] 13
len b[] 13
a[0] = 1
print 1
for n = 1 to 12
b[0] = 0
write 0 & " "
for k = 1 to n
b[k] = a[k - 1] + (n - 1) * a[k]
write b[k] & " "
.
print ""
swap a[] b[]
.
</syntaxhighlight>
=={{header|Factor}}==
| |||