13 lines
185 B
Plaintext
13 lines
185 B
Plaintext
s = 33;
|
|
i = 0;
|
|
j = 0;
|
|
t = i + j;
|
|
f = 6;
|
|
while (s < 42) do {
|
|
a = s - 1;
|
|
c = (i + j) * (f + 1);
|
|
if (c > 0) then j = j / c else i = j * c;
|
|
i = (j * 2) / f;
|
|
s = s + 1
|
|
}
|