Egyptian division: Difference between revisions

m
→‎{{header|Tailspin}}: update to stricter typing
No edit summary
m (→‎{{header|Tailspin}}: update to stricter typing)
Line 2,701:
end egyptianDivision
[580"1", 34"1"] -> egyptianDivision -> 'Quotient: $.answer; Remainder: $: 580"1" - $.accumulator;' -> !OUT::write
</lang>
 
{{out}}
<pre>Quotient: 17"1" Remainder: 2"1"</pre>
 
=={{header|VBA}}==
Anonymous user