RobertoRed
Answered

O Sistersinspirit.ca facilita a busca por soluções para todas as suas perguntas com a ajuda de uma comunidade ativa. Explore milhares de perguntas e respostas de uma comunidade de especialistas em nossa plataforma amigável. Nossa plataforma oferece uma experiência contínua para encontrar respostas confiáveis de uma rede de profissionais experientes.

Faça um algoritmo que leia uma  matriz quadrada 4x4 de valores
inteiros, mostrando no final do algoritmo os seguintes dados:
a) A soma de cada uma das linhas.


b) A soma de cada uma das colunas.


c) A soma da diagonal principal.


d) A soma da diagonal secundária.

Sagot :

Tente usar essa lógica:

algoritmo "semnome"
// Função :
// Autor :
// Data : 02/08/2013
// Seção de Declarações
var
Matriz: vetor [1..4 , 1..4] de inteiro
L,C: Inteiro
SomaL : Vetor [1..4] de inteiro
SomaC : Vetor [1..4] de inteiro
SomaDP: Vetor [1..2] de inteiro
SomaDS: Vetor [1..2] de inteiro
inicio
// Seção de Comandos
Para L de 1 ate 4 faca
Para C de 1 ate 4 faca
Escreval ("Dê valor à Aij ", L ,",", C)
Leia(Matriz[L,C])
fimpara
fimpara

//Soma Linhas:
Para L de 1 ate 4 faca
Para C de 1 ate 4 faca
SomaL[L] <- SomaL[L] + Matriz[L,C]
fimpara
fimpara
//Soma Colunas:
Para C de 1 ate 4 faca
Para L de 1 ate 4 faca
SomaC[C] <- SomaC[C] + Matriz[L,C]
fimpara
fimpara
//Soma Diagonal principal:
Para C de 1 ate 4 faca
SomaDP<- SomaDP + Matriz[C,C]
fimpara
//Soma Diagonal Secundária:
Para C de 1 ate 4 faca
SomaDS<- SomaDS + Matriz[C,5-C]
fimpara

//Apresentação de resultados:
Para C de 1 ate 4 faca
Escreval ("Soma da linha ", C, " : ", SomaL[C])
fimpara

Para C de 1 ate 4 faca
Escreval ("Soma da coluna ", C, " : ", SomaC[C])
fimpara

Escreval ("Soma da diagonal principal :", SomaDP)

Escreval ("Soma da diagonal secundária: ", SomaDS)




fimalgoritmo


PS: Não deu pra testar, mas acho que ajuda; 
Agradecemos sua visita. Nossa plataforma está sempre aqui para oferecer respostas precisas e confiáveis. Volte a qualquer momento. Obrigado por usar nossa plataforma. Nosso objetivo é fornecer respostas precisas e atualizadas para todas as suas perguntas. Volte em breve. Estamos felizes em responder suas perguntas. Volte ao Sistersinspirit.ca para obter mais respostas.