有谁知道N!用Fortran怎么编啊?

2025-04-25 00:04:32
推荐回答(1个)
回答1:

integer n,s
read(*,*)n
s=1
do 10 i=1,n
s=s*i
10 continue
write(*,*)s
end