用Fortran设计一个函数子程序,对于自然数m,n,用该函数求m,n的最小公倍数
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/12 02:32:51
用Fortran设计一个函数子程序,对于自然数m,n,用该函数求m,n的最小公倍数
Program Finite_Element
integer :: m,n,s,temp
write(*,*)"请输入两个数:"
read(*,*)m,n
s=m*n
if(m<n)then
temp=m;m=n;n=temp
end if
do while(mod(m,n)/=0)
temp=n;n=mod(m,n);m=temp
end do
write(*,"('最大公约数为:'i4)") n
write(*,"('最小公倍数为:'i4)") s/n
end
integer :: m,n,s,temp
write(*,*)"请输入两个数:"
read(*,*)m,n
s=m*n
if(m<n)then
temp=m;m=n;n=temp
end if
do while(mod(m,n)/=0)
temp=n;n=mod(m,n);m=temp
end do
write(*,"('最大公约数为:'i4)") n
write(*,"('最小公倍数为:'i4)") s/n
end
急求 1、设计一个判断两个整数大小的VBA子过程. 2、设计一个计算从n~m之间所有自然数之和的VBA函数.
VB程序,编写一个用辗转相除法,求俩自然数m、n的最大公约数和最小公倍数.
求教用VB 写程序.求两自然数m,n的最小公倍数.这样写对吗?
vb编程"编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!
vb:求两自然数m,n的最小公倍数?
.求两个自然数M和N的最小公倍数.pascal
编程求两个自然数,m.n的最小公倍数
设计程序,求两正整数m,n的最小公倍数
matlab:编写一个函数,实现当输入fun2010(m,n)时,输入m,n的最大公约数和最小公倍数.
求函数Cmn=m!/(n!*(m-n)!)的程序
用递归函数求m的n次方
定义一个函数求F=(N+M)!+N!,M,N均为正整数.要求用递归调用