lama_byterun/regression/test009.expr

9 lines
101 B
Text
Raw Normal View History

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