Revision as of 16:12, 12 May 2022 (view source) Hakank (talk \| contribs) (→‎{{header\|Picat}}: Added {{out}}. Deleted the test part.) ← Older edit		Revision as of 10:34, 25 June 2022 (view source) Bernie (talk \| contribs) (→‎{{header\|FutureBasic}}) Newer edit →
Line 1,632: =={{header\|FutureBasic}}== <lang futurebasic>include "NSLog.incl" ~~include "ConsoleWindow"~~ void local fn Doit ~~dim~~ as long penny, nickel, dime, quarter , count = 0 ~~penny = 1 : nickel = 1~~ NSLogSetTabInterval(30) ~~dime = 1 : quarter = 1~~ for penny = 0 to 100 for nickel = 0 to 20 for dime = 0 to 10 for quarter = 0 to 4 if penny + nickel * 5 + dime * 10 + quarter * 25 == 100 ~~print penny;~~ NSLog(@"%ld pennies ~~"; nickel;"~~\t%ld nickels ~~"; dime; "~~\t%ld dimes\t%ld quarters"; ,penny,nickel,dime,quarter~~; " quarters"~~) count++ end if next quarter next dime next nickel next penny ~~print~~ ~~count;~~ NSLog(@"\n%ld ways to make a dollar",count) end fn fn DoIt ~~</lang>~~ HandleEvents</lang> Output: <pre>0 pennies 0 nickels 0 dimes 4 quarters▼ ~~<pre>~~ ▲0 pennies 0 nickels 0 dimes 4 quarters 0 pennies 0 nickels 5 dimes 2 quarters 0 pennies 0 nickels 10 dimes 0 quarters Line 1,668 ⟶ 1,670: 70 pennies 1 nickels 0 dimes 1 quarters 242 ways to make a dollar</pre> ~~</pre>~~ =={{header\|Go}}==

Count the coins: Difference between revisions

Count the coins (view source)