12 lines
134 B
Plaintext
12 lines
134 B
Plaintext
N := 2;
|
|
F := 1;
|
|
while N > 0 do
|
|
X := N;
|
|
Z := F;
|
|
while X > 1 do
|
|
F := Z + F;
|
|
X := X - 1
|
|
endwhile;
|
|
N := N - 1
|
|
endwhile
|