gauss2.f90

I suggest you either typed  this as it appears into the compiler, or as an easier way, just copy and paste it!

Note: I do not claim the program will 100% work, but I give it my best. If it doesn't, try tweaking it yourself, or email me about it, and I'll modify and post the improved version later. Good luck!

program gaussan2
implicit none
real, dimension(4,5) :: matrics_unsolved_array
real :: array_read_in
integer :: i,j,k,a,b,c

DO i=1,4
do j=1,5
print*, "values??"
read*, array_read_in
matrics_unsolved_array(i,j)=array_read_in
end do
END DO
print '(5F5.2)', ((matrics_unsolved_array(i,j),j=1,5),i=1,4)
end program gaussan2