Rosetta Code

Ethiopian multiplication: Difference between revisions

Page Discussion

Ethiopian multiplication (view source)

Revision as of 18:38, 23 July 2009

13 bytes removed ,  14 years ago
m
→‎{{header|AutoHotkey}}: changed "loop" to "while"
(add AutoHotkey)
m (→‎{{header|AutoHotkey}}: changed "loop" to "while")
Line 68:
Ethiopian( a, b ) {
r := (isEven(a) ? 0 : b)
if While (a != 1) {▼
Loop
{
a := half(a)
b := double(b)
if !isEven(a)
r += b
▲ if (a = 1)
break
}
return r
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/121467"