lama_byterun/regression/test009.expr

11 lines
107 B
Text
Raw Normal View History

global n, k, res;
n := 2;
k := 10;
res := 1;
while k > 0 do
res := res * n;
k := k - 1
od;
write(res)