fortran编程——————急求高手1.写一语句函数,计算数学式1*1+2*2+.+K*K的值 .2.编写程序:1+4+7+.+100.3.输入任意三个数,由小到大排序

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 11:15:49
fortran编程——————急求高手1.写一语句函数,计算数学式1*1+2*2+.+K*K的值 .2.编写程序:1+4+7+.+100.3.输入任意三个数,由小到大排序

fortran编程——————急求高手1.写一语句函数,计算数学式1*1+2*2+.+K*K的值 .2.编写程序:1+4+7+.+100.3.输入任意三个数,由小到大排序
fortran编程——————急求高手
1.写一语句函数,计算数学式1*1+2*2+.+K*K的值 .
2.编写程序:1+4+7+.+100.
3.输入任意三个数,由小到大排序

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)

fortran编程——————急求高手1.写一语句函数,计算数学式1*1+2*2+.+K*K的值 .2.编写程序:1+4+7+.+100.3.输入任意三个数,由小到大排序 pascal语言编程问题(free pascal求1—N中的素数的个数.(1 VB编程求1—50的偶数平方和与奇数平方差 求应用Newton—Raphson迭代法进行数字相关面内位移数值计算的Matlab程序代码我自己编了,但是出不来结果,请高手指教下.(对编程不是很懂,第一次编程序) 急求高手解答用VB编程“求1-100之间可以被5或7整除的数之和. 编程计算100—200之间7的倍数之和 vf大神求指教~!编程题!1.编程求Fibonacci数列(即0,1,1,2,3,5,……)前30项和2.编程统计100—10000之间个位数是9的数的个数3.编程统计1000的正整数约数(因子)的个数(1和1000本身除外)cleara=0b=1s=0f 求解C语言编程题啊亲们,编程将200—300之间能被7整除的数输出. Fortran编程--求高手有2列数,一列是日序,第1到365天.另一列是每天的太阳辐射,大小无规律.如何统计出连续出现4天以上 辐射值小于1000的起始日序.如下列数据中,从第5天开始,连续4个值小于1000, 编程求出1—100之间能被3或7整除的数的平方和 VB编程求1——500之中能被3整除但不能被5整除的数的个数以及这些数累加的和.RT 编程输出1—1000中所有个位数是7的素数,统计其个数,并求满足该条件数的和,输出结果 求数学建模高手——线性规划题,如何用MATLAB编程?紧急!max=1.15*x4A+1.40*x2C+1.25*x3B+1.06*x5D;x1A+x1D=100000;-1.06*x1D+x2A+x2C+x2D=0;-1.15*x1A+x3A+x3B-1.06*x2D+x3D=0;-1.15*x2A+x4A-1.06*x3D+x4D=0;-1.15*x3A-1.06*x4D+x5D=0;x2C 作文——急求 . 求高手指点:请尽快给我写信 用英语怎么说,急Please write to me ———— me后有四个空格 2012X20132013—2013X20122012谁会呀·求高手 the road outside the school is very busy.Many trucks ,buses cars u—— the road.求各位英语高手来解答,快啊!急! 编程已知:S=1+3+5+7+9...,求S不大于9000的最大值VFP编程,谢谢高手