> a; > r; > n; < N;
i = 0; s = 0;
{ n - i ?
t = a*r^i;
s = s + t;
< i; < B;
< t; < T;
< s; < N;
i = i + 1;
}
< N; < s; < T;
< a*(1 - r^n)/(1 - r);
< N; $ | % javac Tiny.java
% java Tiny < g.t > g.s
% spim -file g.s
2
3
10
0 2 2
1 6 8
2 18 26
3 54 80
4 162 242
5 486 728
6 1458 2186
7 4374 6560
8 13122 19682
9 39366 59048
59048 59048
| % javac Tiny.java
% java Tiny < g.t > g.s
% spim -file g.s
5
7
10
0 5 5
1 35 40
2 245 285
3 1715 2000
4 12005 14005
5 84035 98040
6 588245 686285
7 4117715 4804000
8 28824005 33628005
9 201768035 235396040
235396040 235396040
|