Count in factors: Difference between revisions
Content added Content deleted
(Racket) |
|||
Line 1,443: | Line 1,443: | ||
(define (factors fs) |
(define (factors fs) |
||
(add-between |
(add-between (map ~ fs) " * ")) |
||
(for/list ([f fs]) (~ f)) " * ")) |
|||
(for ([x (in-range 2 20)]) |
(for ([x (in-range 2 20)]) |
||
Line 1,472: | Line 1,471: | ||
19 = 19 |
19 = 19 |
||
</pre> |
</pre> |
||
=={{header|REXX}}== |
=={{header|REXX}}== |