Material de base para exposição do professor para aula do dia 18-06-2015
Figura: Representação de Matrizes – 1, 2 e 3 Dimensões |
Codigo Fonte Fortran | Resultado |
program generico integer :: a dimension :: a(-3:2,3) 1 format(1x,sp,a,i3.2,a,i3.2,a,i3.2) print '(A,/,25("_"))','Elementos da matriz a' do i=-3,2 do j=1,3 (i,j)=i**j print 1,'a(',i,',',j,')=', a(i,j) end do end do end program generico |
Elementos da matriz a _________________________ a(-03,+01)=-03 a(-03,+02)=+09 a(-03,+03)=-27 a(-02,+01)=-02 a(-02,+02)=+04 a(-02,+03)=-08 a(-01,+01)=-01 a(-01,+02)=+01 a(-01,+03)=-01 a(+00,+01)=+00 a(+00,+02)=+00 a(+00,+03)=+00 a(+01,+01)=+01 a(+01,+02)=+01 a(+01,+03)=+01 a(+02,+01)=+02 a(+02,+02)=+04 a(+02,+03)=+08 |
Elementos de discussao:
- Declaracao e estrutura de variaveis do tipo Matricial (indexadas, multidimensionais)
- Formatos (inteiros de tamanho fixo i3.2, caracteres e espacos)
Atividade:
A partir do exemplo (Atividade Matriz 3×3), faça um programa semelhante, contudo, para uma matrix 2×2.
program matriz_3x3 | |
! Matriz | |
! | |
! | 3 -7 4 | | a11 a12 a13 | | A(1,1) A(1,2) A(1,3) | | |
! A = | 0 1 5 | = | a21 a22 a23 | = | A(2,1) A(2,2) A(2,3) | | |
! | 4 2 2 | | a31 a32 a33 | | A(3,1) A(3,2) A(3,3) | | |
! | |
integer A(3,3) | |
data A /3,0,4,–7,1,2,4,5,2/ | |
print *," Matriz A " | |
print *,"==========" | |
print 100, ((A(i,j),j=1,3),i=1,3) | |
100 format(3(i2,1X),/) | |
101 format("A(",i1,",",i1,") = ",i2) | |
! Imprimindo elemento por elemento | |
print *,"_______________________" | |
print *," Elementos da Matriz A " | |
print *,"———————–" | |
do i=1,3 | |
do j=1,3 | |
print 101,i,j,A(i,j) | |
enddo | |
enddo | |
stop '>>> Programa finalizado!' | |
end program matriz_3x3 |