题目
fortran题矩阵
program ddc
parameter(M=5,N=5)
integer i,j
real:A(M,N)
A=Reshape((/12,40,20,18,11,25,17,50,30,45,24,16,14,54,15,48,20,10,38,28,52,19,28,35,42/),(/5,5/))
print*,"原矩阵:"
write(*,100) ((A(i,j),i=1,M),j=1,N)
100 FORMAT((F5.1,2X))
end
program ddc
parameter(M=5,N=5)
integer i,j
real:A(M,N)
A=Reshape((/12,40,20,18,11,25,17,50,30,45,24,16,14,54,15,48,20,10,38,28,52,19,28,35,42/),(/5,5/))
print*,"原矩阵:"
write(*,100) ((A(i,j),i=1,M),j=1,N)
100 FORMAT((F5.1,2X))
end
提问时间:2021-02-23
答案
program ddcparameter(M=5,N=5)integer i,jreal::A(M,N) !// 此处两个冒号A=Reshape((/12,40,20,18,11,25,17,50,30,45,24,16,14,54,15,48,20,10,38,28,52,19,28,35,42/),(/5,5/))print*,"原矩阵:"write(*,100) ((A(...
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点
- 1请问Ca(OH)2+SO2=CaSO3↓+H2O Ca(OH)2+SO3=CaSO4+H2O为什么前面是生成2个氧的而后面是3个氧的?
- 2在做“海波的熔化”实验时,试管中装有海波,放在盛水的容器中,用酒精灯在烧杯底部加热一段时间后,海波开始熔化,若这时把酒精灯撤走,则下列判断中正确的是( ) A.海波一定
- 3核磁共振氢谱有两组峰,且峰面积比为3:2的是
- 4买13千克芒果糖还差14元.如果买15千克奶糖还剩2元,芒果糖比奶糖贵2元,带了多少钱?
- 5求形容男人的手或者手指的词语,用于古风文中的!
- 6无线传输介质的特点是什么?
- 7有红白黄蓝4个旗各1面,取3面排1串,不同颜色不同次序表示不同信号求可以组成几种信号?
- 8大量的动物(哺乳类,鸟类,鱼类,昆虫类)同时迁徙或者统一运动,是怎么组织起来的?
- 9The doctor me over and said that I drank too many coid drinks的中文意思
- 10酸溶液和酸性溶液的区别?