11 lines
176 B
Text
11 lines
176 B
Text
1.1 S OLD(1)=1; T %4.0, 1, !
|
|
1.2 F N=1,10; D 2
|
|
1.3 Q
|
|
|
|
2.1 S NEW(1)=1
|
|
2.2 F X=1,N; S NEW(X+1)=OLD(X)+OLD(X+1)
|
|
2.3 F X=1,N+1; D 3
|
|
2.4 T !
|
|
|
|
3.1 S OLD(X)=NEW(X)
|
|
3.2 T %4.0, OLD(X)
|