lua 函数练习

 --逻辑表达式

 --1+2+3+...+n
 function fun1(n)
     local sum =
     for i=,n do
         sum = sum + i
     end
     return sum
 end

 -- 计算奇数和
 function fun2(n)
     local sum =
     for i=,n, do
         sum = sum + i
     end
     return sum
 end

 -- 计算偶数和
 function fun3(n)
     local sum =
     for i=,n, do
         sum = sum + i
     end
     return sum
 end

 -- 计算n!
 function fun4(n)
     local sum =
     for i=,n do
         sum = sum * i
     end
     return sum
 end

 -- 计算1+2!+3!+...+n!
 function fun5(n)
     local sum,t=,
     for i=,n do
         t =
         for j=,i do
             t = t * j
         end
         sum = sum + t
     end
     return sum
 end

 -- 计算 1+ 1/1! +1/2! +1/3! + ...+1/n!
 function fun6(n)
     local sum=
     for i=,n do
         sum = sum + /fun4(i)
     end
     return sum
 end

 -- 判断n是否为素数（质数）
 function fun7(n)
     io.write(n)
     local t = math.sqrt(n)
     for i=,t do
         if n%i== then
             return false
         end
     end
     return true
 end

 -- 1000以内的水仙花数 如 153 = 1^3 + 5^3 + 3^3
 function fun8()
     local sum =
     local i,j,k=
     for num=, do
         i = math.floor(num/)
         j = math.floor(num%/)
         k = num%
         if num == i^ + j^ + k^  then
             print(num)
         end
     end
 end

 table_str = '0123456789abcdefghijklmnopqrstuvwxyz'
 -- 将10进制数转换为二进制数
 function fun9( n )
     local ys = n %
     n = math.floor(n/)
     if n~= then
         fun9(n)
     end
     io.write(string.sub(table_str,ys+,ys+))
 end
 -- 将10进制数转换为八进制数
 function fun10( n )
     local ys = n %
     n = math.floor(n/)
     if n~= then
         fun10(n)
     end
     io.write(string.sub(table_str,ys+,ys+))
 end

 -- 将10进制数转换为十六进制数
 function fun11( n )
     local ys = n %
     n = math.floor(n/)
     if n~= then
         fun11(n)
     end
     io.write(string.sub(table_str,ys+,ys+))
 end

 -- 将10进制数转换为N进制数
 function fun12( n ,N)
     local ys = n % N
     n = math.floor(n/N)
     if n~= then
         fun12(n,N)
     end
     io.write(string.sub(table_str,ys+,ys+))
 end

 function main( )
     print(fun1())
     print(fun2())
     print(fun3())
     print(fun4())
     print(fun5())--1+2+6+24
     print(fun6())
     print(fun7() and '是素数!' or '不是素数')
     print(fun7() and '是素数!' or '不是素数')
     fun8() -- 水仙花
     fun9();print('')--转换为二进制
     fun10();print('')--转换为八进制
     fun11();print('')--转换为十六进制
     fun12(,);print('')--转换为36进制
 end

 main()