题目
写出一个“求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看图填空： （1）小华骑车从家去相距5千米的图书馆借书，从所给的折线统计图可以看出：小华去图书馆路上停车_分，在图书馆借书用_分． （2）从图书馆返回家中，速度是每小时_千米．
- 2如图，平行四边形ABCD的一条边长为18厘米，两条高分别为8厘米和10厘米，求平行四边形ABCD的周长．
- 3负的平方根怎么算啊,比如-√121怎么算呐?
- 4买椟还珠的相关事例
- 5游山西村是以一个什么字贯穿全诗,生动的描绘了什么?
- 67公顷等于多少平方米?
- 7已知2x-3y+z=0,3x-2y-6z=0且xyz≠0求2x²+y²-z²分之x²+y²+z²的值
- 8帮忙证明“空间中任何两个向量都是共面的”
- 9请以“谢谢你们给了我自由”为题写一篇文章 文体不限【诗歌最好】.
- 10除夕节的英文怎么写