求fortran语言改正!将10个数的数组A中最大的元素与A(10)互换program mainimplicit nonereal,dimension(10)::areal term,maxinteger iread*,amax=a(1)DO I=2,10IF(a(i)>=max)thenmax=a(i)term=maxmax=a(10)a(10)=termend ifend doprint*,aend有什
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/26 04:35:10
xJ@_% 4X=օf9x,Z?
""+xH[i6G+aٙeNjHbe0{j
Wm떈V&oJo49+ekE$h@QmX!
h(0.1A!&tX*i[
\^1 d wX!5T#¯b:i:[𧯗H#DTw%62 ISj BR
Q*}R1S??S|?WiDҳNz4N:Ovz~Yr
di/k)4"=A2U
求fortran语言改正!将10个数的数组A中最大的元素与A(10)互换program mainimplicit nonereal,dimension(10)::areal term,maxinteger iread*,amax=a(1)DO I=2,10IF(a(i)>=max)thenmax=a(i)term=maxmax=a(10)a(10)=termend ifend doprint*,aend有什
求fortran语言改正!将10个数的数组A中最大的元素与A(10)互换
program main
implicit none
real,dimension(10)::a
real term,max
integer i
read*,a
max=a(1)
DO I=2,10
IF(a(i)>=max)then
max=a(i)
term=max
max=a(10)
a(10)=term
end if
end do
print*,a
end有什么错啊?为什么输出结果不变?
求fortran语言改正!将10个数的数组A中最大的元素与A(10)互换program mainimplicit nonereal,dimension(10)::areal term,maxinteger iread*,amax=a(1)DO I=2,10IF(a(i)>=max)thenmax=a(i)term=maxmax=a(10)a(10)=termend ifend doprint*,aend有什
IF(a(i)>=max)then
max=a(i)
a(i)=a(10)
a(10)=max
end if
求fortran语言改正!将10个数的数组A中最大的元素与A(10)互换program mainimplicit nonereal,dimension(10)::areal term,maxinteger iread*,amax=a(1)DO I=2,10IF(a(i)>=max)thenmax=a(i)term=maxmax=a(10)a(10)=termend ifend doprint*,aend有什
C语言求回文数的个数.
怎样用fortran求两个数的最大公因数
求用FORTRAN编的数据处理小程序用FORTRAN将数据分组,现有5544(6*42*22)个数,要分成6小块文件(6个不同变量),每块都是(42*22=924个),最后按6个小块的顺序,每块按一行10个数输出
依次将10个数输入,要求输出其中最大的数,用C语言
C语言:要求输入10个数 将其中最小的数与第一个数对换,把最大的数与最后一个数对换
c++语言求输入10个整数,将其中最小的书与第一个数对换,把最大的数与最后的一个数对换,然后输出者10个数
fortran 怎么找一组数中最小值用fortran变成,求得一组数,比如a,b,c,d,然后用什么语句求这四个数中最小的那个?
求相关系数fortran程序~求相关系数的fortran程序~.
C语言程序:依次将十个数输入、要求将其中最大的数输出
用c语言怎样求10个数里的奇数并将奇数排序
c语言 一次输入10个数要求将其最大的数打印出来 用传统的流程图怎么表示
C语言小题,用传统流程图表示:依次将10个数输入,要求输出其中最大的数.
什么是FORTRAN语言
fortran语言是什么
Fortran语言是什么意思?
fortran语言中的implicit
Fortran语言用杜利特尔法解线性方程组