Matriz 2

Program Matriz_2

Integer X(3,3), i, j

do i=1,3,1

            do j=1,3,1

            Read*, X(i,j)

            enddo

enddo

do i=1,3,1

   do j=1,3,1

   print*,"X(",i,",",j,")", X(i,j)

   enddo

enddo

End