求大佬指点一下

半年没用过fortran的我，还是在图书馆找了一本程序书，照着书给写了一下，可以参考。
!hello!
program homework
implicit none
integer i,j,n,max_1,max_2,max_3,max_4
real, allocatable :: res(:,:) !这里给了一个动态数组。
print*, "输入班级人数"
read(*,*)n
allocate(res(n,4))
read(*,*) ((res(i,j),j=1,4),i=1,n)
max_1 = maxval(res(:,1))
max_2 = maxval(res(:,2))
max_3 = maxval(res(:,3))
max_4 = maxval(res(:,4))
print*, "第一科的最高分为", max_1
deallocate(res)
end program homework
ps:各位有没有好一点的IDE，用vi的我感觉就像个原始人。