R语言 请编写函数计算n的阶乘

Python017

R语言 请编写函数计算n的阶乘,第1张

function factorial(n){ return n >1 ? n * factorial(n-1) : 1}factorial(5)//120 以上函数可以求简单的n的阶乘 由于使用的是原生的乘法，所以计算范围有限主要使用了递归的方式进行计算，是求阶乘的常用方法之一

C语言实现，是最简单的方法：

#include<stdio.h>

void

main()

{

int

i=0

int

a=1

int

n=0

printf("请输入一个正整数n\n")

scanf("%d",&n)

do

{

i*=a

a++

}

while(a<=n)

printf("%d",n)

}

VB或VBS

Option

Explicit

On

Error

Resume

Next

Dim

intInputValue

Dim

iDim

intX

'

忽略数值check

intInputValue

=

CInt(inputbox("请输入整数n，计算n的阶乘",

"n的阶乘"))

intX

=

1

For

i

=

1

To

intInputValue

Step

1

intX

=

intX

*

i

Next

msgbox

CStr(intX),,"n的阶乘1"