Revision as of 18:56, 2 June 2023 (view source) Chkas (talk \| contribs) (→‎{{header\|EasyLang}}) ← Older edit		Revision as of 19:10, 2 June 2023 (view source) Chkas (talk \| contribs) m (→‎{{header\|EasyLang}}) Newer edit →
Line 1,202: len cache[] 100000 * 7 + 6 val[] = [ 1 5 10 25 50 100 ] proc cccount sum kind . r . if sum = 0 r = 1 elif sum < 0 or kind = 0 r = 0 ~~elif cache[sum * 7 + kind] > 0~~ r = cache[sum * 7 + kind]▼ else ~~call~~chind cc= sum -* ~~val[kind]~~7 + kind r2 ~~call~~if cccache[chind] ~~sum~~= ~~kind - 1 r1~~0 r = r1 +call count sum - val[kind] kind r2 ~~cache[sum~~ * 7 +call count sum kind] =- 1 rr1 cache[chind] = r1 + r2 . ▲ r = cache[~~sum * 7 + kind~~chind] . . call cccount 100 4 r print r call cccount ~~100000~~10000 6 r print r</syntaxhighlight> ~~</syntaxhighlight>~~ =={{header\|EchoLisp}}==

Count the coins: Difference between revisions

Count the coins (view source)