Arithmetic/Rational/Tcl: Difference between revisions
Content added Content deleted
m (Add SMW link) |
m (Tweak to make ready to use as template) |
||
Line 1: | Line 1: | ||
{{collection|Rational Arithmetic}}[[implementation of task::Arithmetic/Rational| ]] |
<noinclude>{{collection|Rational Arithmetic}}[[implementation of task::Arithmetic/Rational| ]]</noinclude> |
||
Code to find factors of a number not shown: |
Code to find factors of a number not shown: |
||
<lang tcl>namespace eval rat {} |
<lang tcl>namespace eval rat {} |
||
Line 160: | Line 160: | ||
source primes.tcl |
source primes.tcl |
||
get_perfect_numbers</lang> |
get_perfect_numbers</lang> |
||
{{out}} |
|||
<pre>perfect: 6 |
<pre>perfect: 6 |
||
perfect: 28 |
perfect: 28 |