Portal Física

Fonte de estudo: fiscomp.if.ufrgs.br

As matrizes multidimensionais são úteis em muitas aplicações, por exemplo organizar os valores de temperaturas em diferentes locais, em diferentes tempos, número de execuções em diferentes sessões em dias diferentes, em testes de de trajetória de um planeta no espaço-tempo. É de extrema importância quando necessitamos uma variável para manipular um conjunto muito grande de valores de tipo homogêneos.

[AULA DIA 26/06/2019](https://portalfisica.com/index.php/2019/06/28/arrays-e-es-formatada-em-fortran/)

Materiais de Leitura Recomendados

Slideplayer – 2581486 – (pg: 23…)
Slideplayer – 7256202
Slideplayer.com – 16/4953439

• Matrizes e Sistemas de Equações Lineares – OregonState.edu

---

Código de aula usado no dia 13-06-2018

Recurso – W. Brainerd, C. Goldberg, and J. Adams.

Material da aula do dia 13-06-2018

	program matrizes
	implicit none
	!Declarar vars linhas e colunas i,j
	integer :: i,j
	integer, dimension(3,3) :: ID3
	integer, dimension(3,3) :: A !linha1 linha2 linha3
	integer, dimension(3,3) :: B = reshape((/3,1,5, 9,1,7, 2,1,0/),(/3,3/))
	integer, dimension(3,3) :: C
	do i = 1,3 ! linhas
	do j = 1, 3 ! colunas
	!Lógica da matriz identidade aij = 0para todo i diferente de j
	if ( i /= j ) then
	id3(i,j) = 0
	else
	id3(i,j) = 1
	end if
	end do
	end do
	!print '(3(i3))', id3
	print 100, id3
	100 format(3(i3))
	! reais print '(3(f8.5))', REAL(id3)
	! SEGUNDO EXERCICIO, CONSTRUA A MATRIZ C = A + B
	A = ID3
	print *, "Matriz A:"
	print 100, A
	print *, "Matriz B:"
	print 100, B
	!calcular a C, cij = aij + bij
	do i = 1,3 ! linhas
	do j = 1, 3 ! colunas
	c(i,j) = a(i,j) + b(i,j)
	end do
	end do
	print *, "Matriz C:"
	print 100, C
	! Fontes de leitura
	! https://goo.gl/bWrisc
	! https://goo.gl/xLNMwq
	end program matrizes

view raw matrizes-2017-11-17.f90 hosted with ❤ by GitHub

Atividades

Capítulo 2 (CUNHA, R. R. D, 2011)

Mais fontes bibliográficas

CSCI251, Spring 2009 Sections 1 and 2, Lecture 32, Apr, 15, 2009
Programmer’s Guide to Fortran 90, 3nd Edition
Matrix Operations – online

---

V28062019
IDPF-3413