deem uma olhada noq esta faltando para sair igual ao pedido ajudem

[Victor Hugo Silva]

Escrever um algoritmo que lê uma matriz M(10,10) e a escreve. Troque, a seguir: 

         a) a diagonal principal com a diagonal secundária 

          a linha 5 com a coluna 10. 

 

         Escreva a matriz assim modificada

 

Visual g. 

 

algoritmo "10x10"

// Função :

// Autor :

// Data : 05/12/2014

// Seção de Declarações 

var

matr:vetor[1..10,1..10] de real

matr2:vetor[1..10,1..10] de real

l,c:inteiro

inicio

PARA l de 1 ate 10 FACA

PARA c de 1 ate 10 FACA

escreval("Digite o número referente a linha",l," e coluna",c,":")

leia(matr[l,c])

matr2[l,c] <- matr[l,c]

FIMPARA

FIMPARA

escreval("  Matriz Final ")

PARA l de 1 ate 10 FACA

PARA c de 1 ate 10 FACA

escreval("| ",matr2[l,1]," | ",matr2[l,2]," | ",matr2[l,3]," | ",matr2[l,4]," | ",matr2[l,5]," | ",matr2[l,6]," | ",matr2[l,7]," | ",matr2[l,8]," | ",matr2[l,9]," | ",matr2[l,10]," | ")

FIMPARA

fimalgoritmo