RosettaCodeData/Task/A+B/Oforth/a+b.oforth
2018-06-22 20:57:24 +00:00

3 lines
84 B
Text

import: mapping
System.Console accept words map( #>integer) reduce( #+ ) printcr .