Help for this page
#lang scheme (define (sum-of-ints li [sum 0]) ... (for ([r test-data]) (printf "~a ~a~n" r (roman-to-dec r)))
+% mzscheme roman.ss XLII 42 LXIX 69 mi 1001 MCMLXXXV 1985
www.com | www.net | www.org
No recent polls found