local n = 2, k = 10;

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