Arithmetic/Rational: Difference between revisions
Added Wren
m (Phix/mpfr) |
(Added Wren) |
||
Line 4,280:
{{incomplete|TI-89 BASIC}}
While TI-89 BASIC has built-in rational and symbolic arithmetic, it does not have user-defined data types.
=={{header|Wren}}==
{{libheader|Wren-math}}
{{libheader|Wren-rat}}
The latter module already contains support for rational number arithmetic.
<lang ecmascript>import "/math" for Int
import "/rat" for Rat
System.print("The following numbers (less than 2^19) are perfect:")
for (i in 2...(1<<19)) {
var sum = Rat.new(1, i)
for (j in Int.properDivisors(i)[1..-1]) sum = sum + Rat.new(1, j)
if (sum == Rat.one) System.print(" %(i)")
}</lang>
{{out}}
<pre>
The following numbers (less than 2^19) are perfect:
6
28
496
8128
</pre>
=={{header|zkl}}==
| |||