thegoodfellas/blogset-br huggingface dataset:
Na aula de hoje o professor Jossandro corrigiu as questoes que ficaram pendentes da aula anterior, e nos passou mais 3 questoes que seguem abaixo.1) Faca um algoritmo que preencha uma matriz M (2x2), calcule e mostre a matriz R, resultante da multiplicacao dos elementos de M pelo seu maior elemento.algoritmo "maior"var m:vetor [1..2,1..2] de real r:vetor [1..2,1..2] de real maior,lim,col:real n,i:inteiroinicio para n de 1 ate 2 faca para i de 1 ate 2 faca escreval("Digite um numero para linha ",n," e para coluna ",i,":") leia(m[n,i]) fimpara fimpara maior<- m[1,1] pos<- 1,1 para n de 1 ate 2 faca para i de 1 ate 2 faca se (maior < m[n,i]) entao maior<- m[n,i] lim<- n col<- i fimse fimpara fimpara escreval("O numero maior da matriz foi",maior) para n de 1 ate 2 faca para i de 1 ate 2 faca r[n,i]<- m[n,i] * maior escreval("O resultado da multiplicacao entre ",m[n,i]," e ",maior," foi ",r[n,i]) fimpara fimparafimalgoritmo2) Faca um programa que preencha:Um vetor com oito posicoes, contendo nomes de lojas;Outro vetor com quatro posicoes, contendo nomes de produtos;Uma matriz com os precos de todos os produtos em cada loja.O programa devera mostrar todas as relacoes (nome do produto nome da loja) em que o preco nao ultrapasse R$ 120,00.algoritmo"loja"var loja:vetor[1..8]de caractere prod:vetor[1..4]de caractere preco:vetor[1..8,1..4]de real i,j:inteiroinicio parai<-1ate 8 faca escreval("Digite o nome da loja ",i) leia(loja[i]) fimpara para i <- 1 ate 4 faca escreval("Digite o nome do produto ",i) leia(prod[i]) fimpara para i <- 1 ate 8 faca para j <- 1 ate 4 faca escreval("Digite o preco do(a) ",prod[j]," na loja ",loja[i]) leia(preco[i,j]) fimpara fimpara para i <- 1 ate 8 faca para j <- 1 ate 4 faca se (preco[i,j] <= 120) entao escreval(prod[j]," custa R$",preco[i,j]," na loja ",loja[i]) fimse fimpara fimparafimalgoritmo3) Na teoria dos sistemas, define-se o elemento MINMAX de uma matriz como o maior elemento da linha em que se econtra o menor elemento da matriz. Elabore um programa que carregue uma matriz 4x7 com numeros reais, calcule e mostre seu MINMAX e sua posicao (linha e coluna). algoritmo "minmax"var mat:vetor[1..4,1..7] de real menor,maior,coluna,colunamaior,linha: real n,i: inteiroinicio para n de 1 ate 4 faca para i de 1 ate 7 faca escreval("digite o numero pertencente a coluna ",i," e a linha ",n,":") leia(mat[n,i]) fimpara fimpara menor<- mat[1,1] linha<- 1 coluna<- 1 para n de 1 ate 4 faca para i de 1 ate 7 faca se menor < mat[n,i] entao menor<- mat[n,i] linha<- n coluna<- i fimse fimpara fimpara maior<- mat[linha,1] colunamaior<- 1 para n de 1 ate 1 faca para i de 1 ate 7 faca se maior < mat[linha,i] entao maior<- mat[linha,i] colunamaior<- i fimse fimpara fimpara escreval("o menor numero e ",menor," esta na linha ",linha,",e na coluna ",coluna," e o maior desta linha e ",maior," esta na coluna ",colunamaior)fimalgoritmoNa aula de hoje tive alguma dificuldade na resolucao dos exercicios, apos a explicacao do professor acabei entendendo. Agora esta acalmando o temor da materia e dando para perceber onde estao os erros. Nesta aula foi nos passado 3 exercicios para resolver os quais seguem abaixo
resolvidas.1) Faca um programa que preencha dois vetores de cinco elementos numericos cada um e mostre o vetor resultante da multiplicacao dos valores destes vetores. Vetor 1: 3 5 4 2 2 1 2 3 4 5 Vetor 2: 7 15 20 0 18 1 2 3 4 5 Vetor resultante da multiplicacao: 21 75 80 0 36 1 2 3 4 5 algoritmo "multiplica_vetor"var v1, v2, result : vetor [1..5] de inteiro indice : inteiroinicio para indice de 1 ate 5 faca escreval("Digite o numero para a posicao ",indice," do vetor 1") leia (v1[indice]) fimpara para indice de 1 ate 5 faca escreval("Digite o numero para a posicao ",indice," do vetor 2") leia (v2[indice]) fimpara para indice de 1 ate 5 faca result[indice] <- v1[indice] * v2[indice] escreval (v1[indice]," * ",v2[indice]," = ",result[indice]) fimparafimalgoritmo2) Uma pequena loja de artesanato possui apenas um vendedor e comercializa dez tipos de objetos. O vendedor recebe, mensalmente, salario de R$ 400,00, acrescido de 5% do valor total de suas vendas. O valor unitario dos objetos deve ser informado e armazenado em uma matriz; a quantidade vendida de cada peca deve ficar na mesma matriz, em outra coluna. Crie um programa que receba os precos e as quantidades vendidas e armazenando-os na matriz. Depois determine e mostre: um relatorio contendo quantidade vendida, valor unitario e valor total de cada objeto. Ao final devera ser mostrado um valor geral das vendas e o valor da comissao que sera paga ao vendedoro valor do objeto mais vendido e sua posicao na matriz (mostre linha e coluna. Nao se preocupe com empates).algoritmo "vendas"var venda : vetor [1..10,1..2] de real item, maior_pos : inteiro total_produto, total_geral, comissao, maior_qtd : realinicio para item de 1 ate 10 faca escreval ("Digite o valor unitario do produto ",item) leia(venda[item,1]) escreval ("Digite a quantidade do produto ",item) leia(venda[item,2]) fimpara total_geral <- 0 maior_qtd <- venda[1,2] maior_pos <- 1 para item de 1 ate 10 faca total_produto <- venda[item,2] * venda[item,1] escreval("Vendidos ",venda[item,2]," un a R$ ",venda[item,1]," do produto ",item," totalizando R$ ",total_produto) total_geral <- total_geral + total_produto se (venda[item,2] > maior_qtd) entao maior_qtd <- venda[item,2] maior_pos <- item fimse fimpara escreval("O total de vendas e ",total_geral) comissao <- total_geral * 5 / 100 escreval("A comissao do vendedor e ",comissao) escreval("O produto mais vendido custa R$",venda[maior_pos,1]," e esta na linha ",maior_pos," da matriz")fimalgoritmo3) Faca um programa que preencha uma matriz 10 x 3 com as notas de dez alunos em tres provas. O programa devera mostrar um relatorio com o numero dos alunos (numero da linha) e a media do aluno nas 3 provas. Ao final do relatorio, devera mostrar a media geral de todos os alunos. algoritmo "notas"var notas : vetor [1..10,1..3] de real aluno, prova : inteiro soma, soma_geral, media, media_geral : realinicio para aluno de 1 ate 10 faca para prova de 1 ate 3 faca escreval("Digite a nota do aluno ",aluno," na prova ",prova) leia(notas[aluno,prova]) fimpara fimpara soma_geral <- 0 para aluno de 1 ate 10 faca soma <- 0 para prova de 1 ate 3 faca soma <- soma +
notas[aluno,prova] fimpara media <- soma / 3 escreval("A media do aluno ",aluno," e ",media) soma_geral <- soma_geral + media fimpara media_geral <- soma_geral / 10 escreval(" ") escreval("A media geral da turma foi ",media_geral)fimalgoritmo Nesta aula tive bastante dificuldade para interpretar os enunciados, mais com um pouco de calma chegamos la.
Nesta aula comecamos a estudar matrizes, o professor Jossandro nos passou algumas explicacoes e seguimos fazendo alguns exercicios segue abaixo o conteudo apresentado em aula.1 - Faca um programa que preencha uma matriz 10 x 3 com as notas de dez alunos em tres provas. O programa devera mostrar um relatorio com o numero dos alunos (numero da linha) e a prova em que cada aluno obteve menor nota. Ao final do relatorio, devera mostrar quantos alunos tiveram menor nota em cada uma das provas: na prova 1, na prova 2 e na prova 3.algoritmo "prova1"var not: vetor [1..10, 1..3] de real cont1, cont2, cont3, l, c: inteiroinicio para l de 1 ate 10 faca para c de 1 ate 3 faca escreval("Digite a nota da prova ",c," do aluno ",l,": ") leia(not[l,c]) fimpara fimpara cont1<-0 cont2<-0 cont3<-0 para l de 1 ate 10 faca se (not[l,1] <= not[l,2]) e (not[l,1] <= not[l,3]) entao cont1<- cont1 + 1 escreval("A menor nota do aluno ",l," e ", not[l,1]) senao se (not[l,2] <= not[l,1]) e (not[l,2] <= not[l,3]) entao cont2<- cont2 + 1 escreval("A menor nota do aluno ",l," e ", not[l,2]) senao se (not[l,3] <= not[l,2]) e (not[l,3] <= not[l,1]) entao cont3<- cont3 + 1 escreval("A menor nota do aluno ",l," e ", not[l,3]) fimse fimse fimse fimpara escreval(cont1," alunos tiveram a menor nota na prova 1") escreval(cont2," alunos tiveram a menor nota na prova 2") escreval(cont3," alunos tiveram a menor nota na prova 3")fimalgoritmo2 - Faca um programa que preencha uma matriz de 5 x 5 com numeros inteiros, calcule e mostre os numeros superiores a cinquenta e suas respectivas posicoes (linha e coluna). O programa devera mostrar mensagem se nao existir nenhum numero nessa condicao. algoritmo "soma2"var som: vetor [1..5, 1..5] de inteiro cont, l, c: inteiroinicio para l de 1 ate 5 faca para c de 1 ate 5 faca escreval("Digite o numero referente a linha ",l," e coluna ",c,":") leia(som[l,c]) fimpara fimpara cont<- 0 para l de 1 ate 5 faca para c de 1 ate 5 faca se (som[l,c] > 50) entao cont<- cont +1 escreval("O numero referente a linha ",l," e coluna ",c," e maior do que 50") fimse fimpara fimpara se (cont = 0) entao escreval("Nenhum numero digitado foi maior do que 50") fimsefimalgoritmo Algumas duvidas surgiram ao decorrer dos exercicios, mais consegui entender o conteudo sem muitos problemas, o que implica na maioria das vezes a resolucao dos exercicios e o modo como vamos interpretar o enunciado. Vamos aguardar pra ver o que vem por ai. Nesta aula comecamos a estudar vetores, o professor Jossandro nos passou algumas explicacoes e seguimos fazendo alguns exercicios, segue abaixo o conteudo apresentado em aula.1 - Faca um programa que leia 10 nomes de alunos, guarde em uma lista e mostre.algoritmo "nome_alunos"var nomes: vetor[1..10] de caractere i: inteiroinicio para i de 1 ate 10 faca escreval ("Informe o nome ",i," :") leia(nomes[i]) fimpara para i de 1 ate 10 faca escreval ("O nome ",i," e ", nomes[i]) fimparafimalgoritmo2 - Faca um programa que leia 10 nomes de alunos e
sua media final e guarde em listas. Ao final listar o nome dos alunos e sua media, mostrando "aprovado" se a media for maior ou igual a 7 ou "reprovado" caso contrario.algoritmo "nomes_media"var nomes: vetor [1..10] de caracter medias: vetor [1..10] de real i: inteiroinicio para i de 1 ate 10 faca escreval("Informe o nome ",i,":") leia(nomes[i]) escreval("Informe a media do aluno ",i,":") leia(medias[i]) fimpara para i de 1 ate 10 faca escreva("Aluno(a) ",nomes[i]," tem media ",medias[i]," e esta ") se (medias[i]>=7) entao escreval("aprovado") senao escreval("reprovado") fimse fimparafimalgoritmo3 - Faca um programa que leia 50 valores reais e guarde em um vetor. Ao final mostrar a soma e a media dos valores lidos.algoritmo "soma_media"var num: vetor[1..50] de real i: inteiro media, soma: realinicio soma<- 0 para i de 1 ate 50 faca escreval("Informe um numero: ") leia(num[i]) soma<- soma+num[i] FIMPARA media<- soma/50 escreval("A soma dos 50 numeros digitados e: ", soma) escreval("A media dos 50 numeros digitados e: ", media)fimalgoritmo4 - Faca um programa que calcule a media ((nota1+nota2)/2) de 10 alunos e guarde em um vetor, percorra o vetor e mostre as medias. Ao final mostre a media geral do turno.algoritmo "media_geral"var medias: vetor [1..10] de real i: inteiro media_tot, nota1, nota2, geral: realinicio para i de 1 ate 10 faca escreval("Digite a primeira nota do aluno ",i," :") leia(nota1) escreval("Digite a segunda nota do aluno ",i," :") leia(nota2) medias[i]<- ((nota1+nota2)/2) fimpara limpatela geral<-0 para i de 1 ate 10 faca escreval("A media do aluno(a) ",i," e: ",medias[i]) geral<- geral+medias[i] fimpara media_tot<- geral/50 escreval("A media do turno e: ", media_tot)fimalgoritmo5 - Faca um programa que mostre o mes dos ano de acordo com o numero (de 1 a 12) informado pelo usuario.algoritmo "mes"var mes: vetor[1..12] de caractere num: inteiroinicio mes[1]<- "Janeiro" mes[2]<- "Fevereiro" mes[3]<- "Marco" mes[4]<- "Abril" mes[5]<- "Maio" mes[6]<- "Junho" mes[7]<- "Julho" mes[8]<- "Agosto" mes[9]<- "Setembro" mes[10]<- "Outubro" mes[11]<- "Novembro" mes[12]<- "Dezembro" repita escreval("Digite o numero equivalente ao mes desejado: ") leia(num) ate (num>=1) e (num <=12) escreval("O mes digitado e: ", mes[num])fimalgoritmo Algumas duvidas surgiram ao decorrer dos exercicios, mais consegui entender o conteudo sem problemas. Agora percebe-se que ja avancamos bastante na disciplina.
os produtos).algoritmo "exercicio3" var preco,imposto:real pais:inteiro transporte,carga:caracter inicio imposto<-0 repita escreval("Informe o preco do produto") leia(preco) escreval("Informe o pais 1-Brasil 2-Portugal 3-outros") leia(pais) escreval("Informe o meio de transporte T-terrestre F-fluvial A-aereo") leia(transporte) escreval("Carga perigosa ? S-sim N-nao") leia(carga) se(preco <= 280)entao preco<-preco+((preco/100)*5) senao preco<-preco+((preco/100)*10) fimse se(pais = 1)e(carga = "n")e((transporte="t")ou(transporte="f"))entao preco<-preco+34 imposto<-imposto+34 fimse se(pais = 1)e(carga = "n")e(transporte="a")entao preco<-preco+34 preco<-preco+(preco/2) imposto<-imposto+34 fimse se(pais = 1)e(carga = "s")e((transporte="t")ou(transporte="f"))entao preco<-preco+140 imposto<-imposto+140 fimse se(pais = 1)e(carga = "s")e(transporte="a")entao preco<-preco+140 preco<-preco+(preco/2) imposto<-imposto+140 fimse se(pais = 2)entao preco<-preco+59 imposto<-imposto+59 fimse se(pais = 3)e(carga = "s")e((transporte="t")ou(transporte="f"))entao preco<-preco+67 imposto<-imposto+67 fimse se(pais = 3)e(carga = "n")e((transporte="t")ou(transporte="f"))entao preco<-preco+168 imposto<-imposto+168 fimse se(pais = 3)e(carga = "n")e(transporte="a")entao preco<-preco+168 preco<-preco+(preco/2) imposto<-imposto+168 fimse se(pais = 3)e(carga = "s")e(transporte="a")entao preco<-preco+67 preco<-preco+(preco/2) imposto<-imposto+67 fimse escreval("Valor final e =",preco) ate (preco<=0) escreval("Total dos impostos e =",imposto) fimalgoritmo Na aula 17 foi nos passado esses 3 exercicios em forma de trabalho que servira para recuperar a nota da prova, tive bastante dificuldade no exercicio 3. Na aula 18 o professor corrigiu os exercicios e deu para ver que todos os algoritmos da turma haviam algum erro, so vendo a correcao e que se percebe que um enunciado tao simples pode complicar muito forma de fazer algoritmos. function click() {if (event.button==2||event.button==3) {oncontextmenu='return false'; alert ('Todos os direitos reservados');}}function keypresed() {alert(' Todos os direitos reservados ');}document.onkeydown=keypresed;document.onmousedown=clickdocument.oncontextmenu = new Function("return false;")
uma estatistica em cinco cidades brasileiras para coletar dados sobre acidentes de transito, foram obtidos os seguintes dados:a) Codigo da cidade;b) Numero de veiculos de passeio(em 2010);c) Numero de acidentes de transito com vitimas(em 2010).Deseja-saber:a) Qual o maior e menor indice de acidentes de transito e a que cidades pertencem;b) Qual a media de veiculos nas cinco cidades juntas;c) Qual a media de acidentes de transito nas cidades com menos de 2.000 veiculos de passeio. algoritmo_cidadevar cont, cod, num_vei, num_acid, maior, cid_maior, menor, cid_menor: inteiro media_vei, media_acid: real soma_vei, soma_acid, cont_acid:inteiroinicio soma_vei <-0 soma_acid <-0 cont_acid <- 0 para cont <- 1 ate 5 faca escreval("Digite o codigo da cidade, o numero de veiculos e o numero de acidentes" ) leia(cod, num_vei, num_acid) se (cont=1) entao maior <- num_acid cid_maior <- cod menor <- num_acid cid_menor <- cod senao se (num_acid > maior) entao maior <- num_acid cid_maior <- cod fimse se (num_acid < menor) entao menor <- num_acid cid_menor <- cod fimse fimse soma_vei <- soma_vei + num_vei se (num_vei < 2000) entao soma_acid <- soma_acid + num_acid cont_acid <- cont_acid + 1 fimse fimpara escreval("O maior indice e ",maior," na cidade ",cid_maior) escreval("O menor indice e ",menor," na cidade ",cid_menor) media_vei <- soma_vei / 5 escreval("A media de veiculos e ",media_vei) se (cont_acid = 0) entao escreval("Nao foi digitada nenhuma cidade com menos de 2000 veiculos" ) senao media_acid <- soma_acid / cont_acid escreval("A media de acidentes em cidades com menos de 2.000 veiculos e ", media_acid) fimsefimalgoritmo Nessa aula o professor nos passou mais exercicios que serviram de revisao para a prova, conforme relatos ate a questao 5 foi a prova do ano passado, dessas tem algumas questoes que sao bem confusas de resolver. Fiquei em duvida quanto algumas questoes mais apos a correcao tudo ficou mais simples e logico.function click() {if (event.button==2||event.button==3) {oncontextmenu='return false'; alert ('Todos os direitos reservados');}}function keypresed() {alert(' Todos os direitos reservados ');}document.onkeydown=keypresed;document.onmousedown=clickdocument.oncontextmenu = new Function("return false;")
Correcao da prova: Questao 01 - Dados tres valores x, y e z, faca um algoritmo para verificar se eles podem ser os comprimentos dos lados de um triangulo e, se forem, verifique se e um triangulo equilatero, isoscele ou escaleno. Se eles nao formarem um triangulo escreva uma mensagem de alerta. Considere que: * O comprimento de cada lado de um triangulo e menor do que a soma dos outros dois lados; * Um triangulo equilatero tem os seus tres lados iguais; * Um triangulo isoscele tem o comprimento de dois lados iguais; e * Um triangulo escaleno tem os tres lados diferentes. algoritmo_triangulovarx, y, z:inteiroinicioescreval("Digite a medida dos 3 lados do triangulo") leia(x, y, z) se (x >= y+z) ou (y >= x+z) ou (z >= x+y) entao escreval("As medidas informadas nao formam um triangulo") senao se (x=y) e (y=z) entao escreval("Triangulo equilatero - todos os lados iguais") senao se (x=y) ou (x=z) ou (y=z) entao escreval("Triangulo isosceles - 2 lados iguais") senao se (x<>y) e (x<>z) e (y<>z) entao escreval("Triangulo escaleno - todos os lados diferentes") fimse fimse fimse fimse fimalgoritmo Questao 02- Faca um programa que receba a medida de um angulo em graus. Calcule e mostre o quadrante em que se localiza esse angulo. Considere os quadrantes da trigonometria e, no caso de angulos maiores que 360o ou menores que -360o, reduzi-los, mostrando tambem o numero de voltas e o sentido da volta (horario ou anti-horario). algoritmo_angulovar a: inteiro voltas: realinicio escreval("Digite um angulo") leia(a) se (a>360) ou (a < -360) entao voltas <- a / 360 a <- a mod 360 senao voltas <- 0 fimse se (a=0) ou (a=90) ou (a=180) ou (a=270) ou (a=360) ou (a=-90) ou (a=-180) ou (a=-270) ou (a=-360) entao escreval("Esta sobre um dos eixos") senao se ((a >0) e (a < 90)) ou ((a < -270) e (a > -360)) entao escreval("1 quadrante") fimse se ((a >90) e (a < 180)) ou ((a < -180) e (a > -270)) entao escreval("2 quadrante") fimse se ((a >180) e (a < 270)) ou ((a < -90) e (a > -180)) entao escreval("3 quadrante") fimse se ((a >270) e (a < 360)) ou ((a < 0) e (a > -90)) entao escreval("4 quadrante") fimse escreva(" ", voltas," voltas no sentido ") se (a<0) entao escreval(" horario") senao escreval(" anti-horario") fimse fimsefim 03 - Faca um programa que receba varios numeros, calcule e mostre: - a soma dos numeros digitados; - a quantidade de numeros digitados; - a media dos numeros digitados; - o maior numero digitado; - o menor numero digitado; - a media dos numeros pares; - a porcentagem de numeros impares entre todos os numeros digitados; - a soma dos numeros primos digitados; Finalize a entrada de dados com a digitacao do numero 99999. Este numero nao pode considerado nos calculos. algoritmo_varios_numvar num, prim, soma_prim, soma, qtd, z, maior, menor, qtd_par, soma_par, qtd_impar: inteiro media_par, media, perc : realinicio qtd <- 0 qtd_par<-0 soma_par <-0 soma_prim <- 0 qtd_impar <-0 escreval("Digite um numero") leia(num) repita se (qtd=0) entao maior <- num
menor <- num senao se (num > maior) entao maior <- num fimse se (num < menor ) entao menor <- num fimse fimse soma <- soma + num qtd <- qtd + 1 se (num mod 2 = 0) entao soma_par <- soma_par + num qtd_par <- qtd_par + 1 senao qtd_impar <- qtd_impar + 1 fimse prim <- 0 para z de 1 ate num faca se (num mod z = 0) entao prim <- prim + 1 fimse fimpara se (prim <= 2)entao soma_prim <- soma_prim + num fimse leia(num) ate(num=99999) se (qtd = 0) entao escreval("Nenhum numero digitado") senao escreval("A soma e ",soma) escreval("A quantidade e ",qtd) media <- soma / qtd escreval("A media e ", media) escreval("O maior e ", maior) escreval("O menor e ", menor) se (qtd_par = 0 ) entao escreval("Nenhum numero par foi digitado") senao media_par <- soma_par / qtd_par escreval("A media dos pares e ", media_par) fimse perc <- qtd_impar * 100 / qtd escreval("O percentual de impares e ", perc) escreval("A soma dos primos e ",soma_prim) fimsefim Nesta aula realizamos nossa primeira prova, consegui resolver algumas partes das questoes, devido a muito barulho nao consegui me concentrar muito na prova, apesar de ter me empenhado e estudado muito nao tirei uma nota tao boa, me enrolei em algumas partes das questoes nao consigo pensar com zueira. Mais o que importa e que vou continuar estudando e me dedicando cada vez mais.function click() {if (event.button==2||event.button==3) {oncontextmenu='return false'; alert ('Todos os direitos reservados');}}function keypresed() {alert(' Todos os direitos reservados ');}document.onkeydown=keypresed;document.onmousedown=clickdocument.oncontextmenu = new Function("return false;")
Segue abaixo os exercicios apresentados nas aulas 23, 24 e 25:6 - Crie um programa que preencha uma primeira matriz de ordem 4x5 e uma segunda matriz 5x2. O programa devera, tambem, calcular e mostrar a matriz resultante do produto matricial das duas matrizes anteriores, armazenando-o em uma terceira matriz de ordem 4x2.algoritmo "questao6"var mat1:vetor[1..4,1..5] de real mat2:vetor[1..5,1..2] de real res:vetor[1..5,1..2] de real l,c: inteiroinicio para l de 1 ate 4 faca para c de 1 ate 5 faca escreval("digite o numero da linha",l," e coluna ",c,":") leia(mat1[l,c]) fimpara fimpara para l de 1 ate 5 faca para c de 1 ate 2 faca escreval("digite o numero da linha",l," e coluna ",c,", da segunda matriz:") leia(mat2[l,c]) fimpara fimpara para l de 1 ate 4 faca para c de 1 ate 2 faca res[l,c]<- ((mat1[l,1]*mat2[1,c])+(mat1[l,2]*mat2[2,c])+(mat1[l,3]*mat2[3,c])+(mat1[l,4]*mat2[4,c])+(mat1[l,5]*mat2[5,c])) fimpara fimpara para l de 1 ate 4 faca para c de 1 ate 2 faca escreval (res[l,1]," |",res[l,2]) fimpara fimparafimalgoritmo7 - Um elemento Aij de uma matriz e dito ponto de sela da matriz A se, e somente se , Aij for ao mesmo tempo o menor elemento da linha i e o maior elemento da coluna j. Faca um programa que carregue uma matriz de ordem 5x7, verifique se a matriz possui ponto de sela e , se possuir, mostre seu valor e sua localizacao.algoritmo "ponto_de_sela7"var matr:vetor[1..5,1..7] de real l,c,l2,cont,conta,lin,co: inteiro sela:realinicio para l de 1 ate 5 faca para c de 1 ate 7 faca escreval("digite o numero referente a linha",l," e coluna",c,":") leia(matr[l,c]) fimpara fimpara conta<-0 para l de 1 ate 5 faca sela<- matr[l,1] lin<- l co<- 1 para c de 1 ate 7 faca se sela > matr[l,c] entao sela<- matr[l,c] lin<- l co<- c fimse fimpara cont<-0 para l2 de 1 ate 5 faca se sela <= matr[l2,co] entao se (l2<>lin) e (c<>co) entao cont<- cont+1 fimse fimse fimpara se cont = 0 entao escreval(" ") escreval("o ponto de sela da matriz esta na linha",lin,", e na coluna",co," e tem valor",matr[lin,co],".") conta<- conta+1 fimse fimpara se conta = 0 entao escreval(" ") escreval("essa matriz nao tem nenhum ponto de sela.") fimsefimalgoritmo8 - Elabore um programa que preencha uma matriz de 6x4 com numeros inteiros, cacule e mostre quantos elementos dessa matriz sao maiores que 30 e, em seguida, monte uma segunda matriz com os elementos diferentes de 30. No lugar do numero 30 da segunda matriz, coloque o numero zero.algoritmo "quest8"var matr: vetor[1..6,1..4] de inteiro l,c,cont:inteiroinicio cont<-0 para l de 1 ate 6 faca para c de 1 ate 4 faca escreval("digite o numero referente a linha",l," e coluna",c,":") leia (matr[l,c]) se (matr[l,c] > 30) entao cont<- cont +1 fimse se matr[l,c] = 30 entao matr[l,c] <- 0 fimse fimpara fimpara escreval("a matriz tem ",cont," numeros maiores que 30.") para l de 1 ate 6 faca para c de 1 ate 4 faca escreva(" | ",matr[l,c]) fimpara escreval(" |") fimparafimalgoritmo9 - Crie um programa que preencha uma matriz 15 x 5 com numeros inteiros, calcule e mostre quais elementos da matriz se repetem e quantas veses cada um se repete.10 -