program maxa
real a(4,4),amax
read*,a
amax=a(1,1)
do i=1,4
if (a(i,1).gt.amax) amax=a(i,1)
if (a(i,4).gt.amax) amax=a(i,4)
enddo
do j=1,4
if (a(1,j).gt.amax) amax=a(1,j)
if (a(4,j).gt.amax) amax=a(4,j)
enddo
end
这个程序是对的,但是为什么一旦我加入 endif 和 then 的时候 反而错了
语法就是这样的。
比如:
if (a(i,1).gt.amax) amax=a(i,1)
是对的。
如果换成另一种形式,写成
if (a(i,1) .gt. amax) then
amax=a(i,1)
endif.
也是对的。
比如:
if (a(i,1).gt.amax) amax=a(i,1)
是对的。
如果换成另一种形式,写成
if (a(i,1) .gt. amax) then
amax=a(i,1)
endif.
也是对的。
温馨提示:答案为网友推荐,仅供参考