作业帮 > 综合 > 作业

fortran编程——————急求高手

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/25 21:25:00
fortran编程——————急求高手
1.写一语句函数,计算数学式1*1+2*2+.+K*K的值 .
2.编写程序:1+4+7+.+100.
3.输入任意三个数,由小到大排序
1、
sumsqr(k)=k*(k+1)*(2k+1)/6
这个是前k个自然数的平方和公式,有点投机取巧,不知道行不行.
如果用循环或递归的话,当然就简单多了,可以参考楼上那个程序.
2、
s=0
do i=1,100,3
s=s+i
end do
"i=1,100,3"表示1到100,步长为3.
PS,楼上那个程序太复杂化了.
3、
integer::n,i,j,min
real::t
real,dimension(:),allocatable::x
n=3
allocate(x(n))
read(*,*)x
do i=1,n-1
min=i
do j=i+1,n
if(x(j)