Exercício 1

Desenvolva um algoritmo que percorre uma matriz 3x3 dada pelo usuário e soma todos os elementos pares contidos na matriz. Imprima a matriz dada juntamente ao resultado. algoritmo "Matriz_11"

// Função :

// Autor :Dantas

// Seção de Declarações

var

matriz: vetor [1..3,1..3] de inteiro

i,j,soma: inteiro

media: real

inicio

//sessão de comandos

para i de 1 ate 3 faca

para j de 1 ate 3 faca

escreva ("entre com os valores da matriz: ")

leia (matriz[i,j])

se (matriz[i,j] mod 2)=0 entao

soma <- soma + matriz[i,j]

fimse

fimpara

fimpara

para i de 1 ate 3 faca

para j de 1 ate 3 faca

escreva(matriz[i,j]:3)

fimpara

escreval

fimpara

escreval("Soma dos pares = ", soma)

fimalgoritmo

Exercício 2

Desenvolva um algoritmo que recebe 2 vetores de 7 posições e então os ordena.Em seguida, o algoritmo escreve um vetor que é a soma dos dois ordenados, feita índice a índice. algoritmo "vetores_ordenação"

// Função :

// Autor :

// Data : 20/06/2015

// Seção de Declarações

var

vet: vetor[1..7] de inteiro // primeiro vetor

vet2: vetor[1..7] de inteiro // segundo vetor

vet_res: vetor[1..7] de inteiro // vetor resultante dos anteriores

i,j, aux: inteiro // variaveis contador e auxiliar

inicio

escreval("Digite os valores do primeiro vetor:")

para i de 1 ate 7 faca

escreva("Digite os elementos do vetor")

leia(vet[i])

fimpara

escreval("Digite os valores do segundo vetor:")

para i de 1 ate 7 faca

escreva("Digite os elementos do vetor")

leia(vet2[i])

fimpara

escreval("Vetor1 antes:")

para i de 1 ate 7 faca

escreva(vet[i])

fimpara

escreval

escreval("Vetor2 antes:")

para i de 1 ate 7 faca

escreva(vet2[i])

fimpara

//classificação primeiro vetor

para i de 1 ate 6 faca

para j de I+1 ate 7 faca

se vet[i]>vet[j] entao

aux := vet[i]

vet[i] := vet[j]

vet[j] := aux

fimse

fimpara

fimpara

escreval

para i de 1 ate 6 faca

para j de I+1 ate 7 faca

se vet2[i]>vet2[j] entao

aux := vet2[i]

vet2[i] := vet2[j]

vet2[j] := aux

fimse

fimpara

fimpara

escreval

escreval("Soma dos vetores ")

para i de 1 ate 7 faca

vet_res[i] := vet[i]+ vet2[i]

fimpara

para i de 1 ate 7 faca

escreva(vet_res[i]:3)

fimpara

fimalgoritmo

Exercício 3

Desenvolva um algoritmo que recebe duas matrizes 3x3 e calcula o produto entre elas. Em seguida, transponha a matriz resultante e exiba-a ao usuário.

algoritmo "Matriz_11"

// Função :

// Autor :Dantas

// Seção de Declarações

var

matriz: vetor [1..3,1..3] de real

matriz2: vetor [1..3,1..3] de real

matriz_res: vetor[1..3,1..3] de real

matriz_trans: vetor[1..3,1..3] de real

i,j: inteiro

inicio

para i de 1 ate 3 faca

para j de 1 ate 3 faca

escreva ("entre com os valores da 1ª matriz: [",i,",",j,"]: ")

leia (matriz[i,j])

fimpara

fimpara

para i de 1 ate 3 faca

para j de 1 ate 3 faca

escreva ("entre com os valores da 2ª matriz: [",i,",",j,"]: ")

leia (matriz2[i,j])

fimpara

fimpara

// multiplicando a matriz1 com a matriz2

para i de 1 ate 3 faca

para j de 1 ate 3 faca

matriz_res[i,j] := matriz[i,j] * matriz2[i,j]

fimpara

fimpara

para i de 1 ate 3 faca

para j de 1 ate 3 faca

matriz_trans[i,j]:=(matriz_res[j,i])

fimpara

fimpara

para i de 1 ate 3 faca

para j de 1 ate 3 faca

escreva(matriz_res[j,i]:3)

fimpara

escreval

fimpara

fimalgoritmo