题目
写出一个“求3*4矩阵中的最大元素和最小元素”的fortran程序,本人程序小白,望能详细解读下,
提问时间:2021-04-01
答案
PARAMETER (M=3,N=4)
INTEGER A(M,N)
READ(*,*)((A(I,J),J=1,4),I=1,3)
WRITE(*,100)A
100 FORMAT(1X,10I5)
K=1
L=1
!循环求最大值
DO 20 I=1,M
DO 10 J=1,N
IF (A(K,L)A(I,J))THEN
K=I
L=J
END IF
30 CONTINUE
40 CONTINUE
WRITE(*,*)A(K,L)
END
INTEGER A(M,N)
READ(*,*)((A(I,J),J=1,4),I=1,3)
WRITE(*,100)A
100 FORMAT(1X,10I5)
K=1
L=1
!循环求最大值
DO 20 I=1,M
DO 10 J=1,N
IF (A(K,L)A(I,J))THEN
K=I
L=J
END IF
30 CONTINUE
40 CONTINUE
WRITE(*,*)A(K,L)
END
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1《水浒传》的作者对宋江受招安的结局抱什么态度?
- 2方差的定义及物理含义
- 3如图所示,虚线表示等势面,相邻两等势面间的电势差相等,有一带电的小球在该电场中运动,不计小球所受的重力和空气阻力,实线表示该带正电的小球的运动轨迹,小球在a点的动能等于
- 4What do you think is more important,creativity or basic skills?
- 5They were of an age.动词为什么用过去时?
- 65x=0.15+x
- 71乘4分之一加4乘7分之一加7乘10分一···加2008乘2011分之一等
- 8在山的那边,这首诗的诗句后面很少用标点,"而在山的那边,是海!”却用了"!”,这在表达上有什么作用?
- 9关于x的方程x-2m=-3x+4与2-m=x的解互为相反数. (1)求m的值; (2)求这两个方程的解.
- 10三角形三边与内切圆半径的关系
热门考点
- 1电容器串联的总电量怎么计算?
- 2馆为什么是食字旁
- 31/2+1/6+1/12+...+1/156等于多少
- 4a circular object connected at the center to a bar,which is used for making vehicles or pans of mac
- 5got,today,has,headache,he,a 组句子
- 6课文《詹天佑》的作者是谁?
- 7关于xy的二元一次方程组3x+5y=2 2x+7y=m-18的解x、y互为相反数,求m
- 8甲醇和丙酮极性大小
- 91:请你把自己想象成大自然中的一员,你可以把自己当成一种植物或一种动物,也可以当成一种自然现象:想想他们在大自然中是怎样生活或变化的,想向他们眼中的世界是怎样的?并融入自己的感受写下来.2:关于音乐的
- 10一种圆筒状的包装保鲜膜,其规格为20厘米乘60厘米,其内外直径为3.2厘米和4厘米,求这种保鲜膜的厚度.急