Anonymous user
Zeckendorf arithmetic: Difference between revisions
m
→{{header|Elena}}
Line 605:
ELENA 3.4 :
<lang elena>import extensions.
const dig = ("00","01","10").
const dig1 = ("","1","10").
Line 619:
cast n(literal s)
[
int q := 1.▼
int i := s length - 1.
▲ int q := 1.
dLen := i / 2.
int x := dLen.
dVal := 0.
Line 628 ⟶ 631:
[
dVal += ((intConvertor convert(s[i]) - 48) * q).
q *= 2.
Line 723 ⟶ 727:
n readContent(&dVal, &dLen).
m readContent(&mVal, &mLen).
var nn := n.
var mm := m.
0 till((mLen + 1) * 2) do(:GN)
Line 759 ⟶ 766:
n readContent(&dVal, &dLen).
0 to((dLen + 1) * 2) do(:i)
Line 815 ⟶ 822:
console printLine("Addition:").
var n := 10n.
n += 10n.
console printLine(n).
| |||