syr (n) do if n <= 1 then return 1 elseif n mod 2 = 0 then return syr (n / 2) else return syr (3 * n + 1) end end syr (n) local ln do if n <= 1 then return 1 elseif n mod 2 = 0 then ln := n / 2 return syr (n / 2) n := ln else ln := 3 * n + 1 return syr (3 * n + 1) n := ln end end syr (n) local ln do loop if n <= 1 then return 1 elseif n mod 2 = 0 then ln := n / 2 return syr (n / 2) n := ln else ln := 3 * n + 1 return syr (3 * n + 1) n := ln end end end syr (n) local ln do loop if n <= 1 then return 1 elseif n mod 2 = 0 then ln := n / 2 n := ln else ln := 3 * n + 1 n := ln end end end syr (n) do loop if n <= 1 then return 1 elseif n mod 2 = 0 then n := n / 2 else n := 3 * n + 1 end end end syr (n) do while n > 1 loop if n mod 2 = 0 then n := n / 2 else n := 3 * n + 1 end end return 1 end