Fundamentos da computação 2 matriz
Proposto 03 – Faça um programa que crie uma matriz de entrada (5x4) e a partir dela crie uma matriz de saída com as posições da primeira matriz invertidas. (ou seja, o primeiro valor da primeira matriz, será o último valor da segunda). A saída de dados deverá mostrar ambas as matrizes.
SOLUÇÃO (VOCÊS DEVERÃO FAZER OS RASTREIOS DE TELA E MEMÓRIA DESTE EXERCÍCIO PARA ENTREGAR...)
CÓDIGO PASCAL RASTREIO DE TELA
Program MatrizInversa ; var M,Mi: array[1..5,1..4] of integer; l,c:integer; Begin writeln('PROGRAMA INVERTENDO MATRIZES'); FOR L:=1 TO 5 DO BEGIN FOR C:=1 TO 4 DO BEGIN WRITELN('DIGITE VALOR DA POSIÇÃO ',L,':',C, ' DA MATRIZ'); READLN(M[L,C]) ; END; END; FOR L:=1 TO 5 DO BEGIN FOR C:=1 TO 4 DO BEGIN MI[L,C]:=M[6-L,5-C]; END; END; FOR L:=1 TO 5 DO BEGIN FOR C:=1 TO 4 DO BEGIN WRITE(' ', M[L,C]); END; WRITELN; END; WRITELN; WRITELN; FOR L:=1 TO 5 DO BEGIN FOR C:=1 TO 4 DO BEGIN WRITE(' ', MI[L,C]); END; WRITELN; END; WRITELN;
WRITE('FIM DO PROGRAMA MATRIZ INVERSA...ATE A PROXIMA...'); End.
RASTREIO DE MEMÓRIA
L
C
M[L,C]
L
C
MI[L,C]
1
1
1
1
1
20
1
2
2
1
2
19
1
3
3
1
3
18
1
4
4
1
4
17
2
1
5
2
1
16
2
2
6
2
2
15
2
3
7
2
3
14
2
4
8
2
4
13
3
1
9
3
1
12
3
2
10
3
2
11
3
3
11
3
3
10
3
4
12
3
4
9
4
1
13
4
1
8
4
2
14
4
2
7
4
3
15
4
3
6
4
4
16
4
4
5
5
1
17
5
1
4
5
2
18
5
2
3
5
3
19
5
3
2
5
4
20
5
4
1
6
SAI DO LOOP
6
SAI DO LOOP
FLUXOGRAMA
Proposto 04 – Analise o programa abaixo, então, crie um conjunto de dados de entrada e declare através do rastreio