1 开始的连续自然数相乘叫做阶乘.编写一个求n!的函数,调用此函数求:D=用PASCAL编程。
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/07 04:56:12
![1 开始的连续自然数相乘叫做阶乘.编写一个求n!的函数,调用此函数求:D=用PASCAL编程。](/uploads/image/z/8715307-67-7.jpg?t=1+%E5%BC%80%E5%A7%8B%E7%9A%84%E8%BF%9E%E7%BB%AD%E8%87%AA%E7%84%B6%E6%95%B0%E7%9B%B8%E4%B9%98%E5%8F%AB%E5%81%9A%E9%98%B6%E4%B9%98.%E7%BC%96%E5%86%99%E4%B8%80%E4%B8%AA%E6%B1%82n%21%E7%9A%84%E5%87%BD%E6%95%B0%2C%E8%B0%83%E7%94%A8%E6%AD%A4%E5%87%BD%E6%95%B0%E6%B1%82%3AD%EF%BC%9D%E7%94%A8PASCAL%E7%BC%96%E7%A8%8B%E3%80%82)
1 开始的连续自然数相乘叫做阶乘.编写一个求n!的函数,调用此函数求:D=用PASCAL编程。
1 开始的连续自然数相乘叫做阶乘.编写一个求n!的函数,调用此函数求:D=
用PASCAL编程。
1 开始的连续自然数相乘叫做阶乘.编写一个求n!的函数,调用此函数求:D=用PASCAL编程。
var
n:longint;
function d(m:longint):longint;
var
i:longint;
begin
d:=1;
for i:=1 to m do
d:=d*i;
end;
begin
readln(n);
writeln(d(n));
end.
没编译直接打的,大体思路是这样,有错误自行编译修改
VB编程:
Private Function jiech(n As Integer) As Long
Dim i As Integer
jiech = 1
For i = 1 To n
jiech = jiech * i
Next i
End Function
c:
main()...
全部展开
VB编程:
Private Function jiech(n As Integer) As Long
Dim i As Integer
jiech = 1
For i = 1 To n
jiech = jiech * i
Next i
End Function
c:
main()
{
int i;
int n;
int jiech;
jiech=0;
printf("Please enter n:");
scanf("%d",&n);
for(i=1;i<=n;i++)
{
jiech=jiech*i;
}
}
收起
Function jiecheng(n:longint):longint;
begin
if n>1
then jiecheng:=jiecheng(n-1)
else jiecheng:=1;
end;