Revision as of 23:08, 5 May 2016 (view source) SqrtNegInf (talk \| contribs) m (→‎{{header\|Perl 6}}: note that all work with Rakudo) ← Older edit		Revision as of 17:44, 6 July 2016 (view source) Franck (talk \| contribs) m (→‎{{header\|Oforth}}) Newer edit →
Line 1,205: =={{header\|Oforth}}== <lang Oforth>: sumSerie(s, n) { 0 n seq apply(#[ s perform + ]) };</lang> Usage : <lang Oforth>~~sumSerie(~~ #[ sq inv ], 1000) sumSerie println</lang> {{out}}

Sum of a series: Difference between revisions

Sum of a series (view source)