close
階乘Factorial
階乘寫成Factorial(a)，或表示成a!。
]Define.. Factorial(被乘數)
]Instead.. 被乘數 = a
Visual Basic]Dim x = 1
Visual Basic]Do Until a <= 0
Visual Basic]x *= a
Visual Basic]a -= 1
Visual Basic]Loop
]Factorial = x
全站熱搜
留言列表