AULA 20

primeiros exercícios com matrizes e assim como vetores achei facil segue os exercicios ai pessoal

1- Faça um programa que preencha uma matriz 10 x 3 com as notas de dez alunos em três provas. O programa deverá mostrar um relatório com o número dos alunos (numero da linha) e a prova em que cada aluno obteve menor nota. Ao final do relatório, deverá mostrar quantos alunos tiveram menor nota em cada uma das provas: na prova 1, na prova 2 e na prova 3.

algoritmo_media

var

   x,y:inteiro

   nota:vetor[1..10,1..3] de real

inicio

   para x de 1 ate 10 faca

      para y de 1 ate 3 faca

         escreva("Escreva a NOTA Nº",y," do aluno",x,": ")

         leia(nota[x,y])

         limpatela

      fimpara

   fimpara

   para x de 1 ate 10 faca

      se (nota[x,1] < nota[x,2]) e (nota[x,1] < nota[x,3]) entao

         escreval("Aluno",x," teve a pior nota na prova nº 1.")

      senao

         se  (nota[x,2] < nota[x,1]) e (nota[x,2] < nota[x,3]) entao

            escreval("Aluno",x," teve a pior nota na prova nº 2.")

         senao

            se  (nota[x,3] < nota[x,1]) e (nota[x,3] < nota[x,2]) entao

               escreval("Aluno",x," teve a pior nota na prova nº 3.")

            senao

               escreval("Ele teve notas iguais.")

            fimse

         fimse

      fimse

   fimpara

fimalgoritmo

   2- Faça um programa que preencha uma matriz de 5 x 5 com números inteiros, calcule e mostre os números superiores a cinquenta e suas respectivas posições (linha e coluna). O programa deverá mostrar mensagem se não existir nenhum número nessa condição.

algoritmo_cinquenta

var

   num:vetor [1..5,1..5] de inteiro

   maiores:vetor[1..5,1..5] de inteiro

   x,y:inteiro

inicio

   para x de 1 ate 5 faca

      para y de 1 ate 5 faca

         escreva("Escreva um número inteiro: ")

         leia(num[x,y])

         se (num[x,y] > 50) entao

            maiores[x,y]<-num[x,y]

         fimse

      fimpara

   fimpara

   limpatela

   para x de 1 ate 5 faca

      para y de 1 ate 5 faca

         se (maiores[x,y] > 50) entao

            escreval("O Número",maiores[x,y]," é maior que 50.")

         senao

            escreval("O numero da linha",x," e coluna",y," é menore que 50...")

         fimse

      fimpara

   fimpara

fimalgoritmo

apesar das minhas dificuldades consegui resolver esses exerc. com facilidade e gostei desta parte do conteudo, porque ela apre a cabeça pra criar as coisas por exemplo jogos no proprio visualg isso sim e massa

AULA 21

foi dada a correção dos exercicios no inicio dasa aula, e como no final da outra aula podemos debater varios assuntos interesantes sobre esse ramo de informação e de dedicação que e a informatica

1- Faça um programa que preencha dois vetores de cinco elementos numéricos cada um e mostre o vetor resultante da multiplicação 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

Vetores resultantes da multiplicação:

21

75

80

0

36

1

2

3

4

5

algoritmo "exec_01_aula21"

var

   x:inteiro

   vet1,vet2,vet3:vetor[1..5] de real

inicio

   para x de 1 ate 5 faca

      escreva("Digite o valor da coluna",x," da linha 1: ")

      leia(vet1[x])

      escreva("Digite o valor da coluna",x," da linha 2: ")

      leia(vet2[x])

   fimpara

   limpatela

   para x de 1 ate 5 faca

      vet3[x]<-vet1[x]*vet2[x]

      escreval("A multiplicação dos vetores da",x,"ª coluna é",vet3[x],".")

   fimpara

fimalgoritmo

2- Uma pequena loja de artesanato possui apenas um vendedor e comercializa dez tipos de objetos. O vendedor recebe, mensalmente, salário de R$ 400,00, acrescido de 5% do valor total de suas vendas. O valor unitário dos objetos deve ser informado e armazenado em uma matriz; a quantidade vendida de cada peça deve ficar na mesma matriz, em outra coluna.

Crie um programa que receba os preços e as quantidades vendidas e armazenando-os na matriz.

Depois determine e mostre:

  -um relatório contendo quantidade vendida, valor unitário e valor total de cada objeto. Ao final deverá ser mostrado um valor geral das vendas e o valor da comissão que será paga ao vendedor.

  -o valor do objeto mais vendido e sua posição na matriz (mostre linha e coluna. Não se preocupe com empates).

algoritmo "exec_02_aula21"

var

   x,posi:inteiro

   maior,comisao:real

   vet:vetor[1..3,1..10] de real

inicio

   para x de 1 ate 10 faca

      escreva("Digite a quantidade do",x,"º item: ")

      leia(vet[1,x])

      se x =1 entao

         maior<-vet[1,x]

         posi<-x

      fimse

      se vet[1,x] > maior entao

         maior<-vet[1,x]

         posi<-x

      fimse

     escreva("Digite o valor do",x,"º item: ")

      leia(vet[2,x])

      vet[3,x]<-vet[2,x]*vet[1,x]

   fimpara

   limpatela

   para x de 1 ate 10 faca

      escreval("Foi vendido",vet[1,x]," Unidades, a $",vet[2,x],", totalizando $",vet[3,x],".")

      comisao<-(vet[3,x]/100)*5

   fimpara

   escreval("O bonus do vendedor foi $",comisao,".")

   escreval("O item mais vendido foi",vet[1,posi],".")

fimalgoritmo

3- Faça um programa que preencha uma matriz 10 x 3 com as notas de dez alunos em três provas. O programa deverá mostrar um relatório com o número dos alunos (número da linha) e a média do aluno nas 3 provas. Ao final do relatório, deverá mostrar a média geral de todos os alunos.

algoritmo "exec_03_aula21"

var

   x,y:inteiro

   soma:real

   notas:vetor[1..10,1..3] de real

   media:vetor[1..10] de real

inicio

   soma<-0

   para x de 1 ate 10 faca

      para y de 1 ate 3 faca

         escreva("Digite a",y,"º nota do",x,"º aluno: ")

         leia(notas[x,y])

         soma<-soma + notas[x,y]

      fimpara

      media[x]<-(notas[x,1]+notas[x,2]+notas[x,3])/3

   fimpara

   limpatela

   escreval("No total 10 alunos tiveram a média de",((soma/10)/3),".")

   para x de 1 ate 10 faca

      se (media[x] <> 0)entao

         escreval("O aluno",x," obteve a média de",media[x],".")

      senao

         escreval("não foi dessa vez o aluno reprovou")

      fimse

   fimpara

fimalgoritmo

 apesar de estar achando facil, estou compriendendo porque meus colegas falam que esa parte do conteudo e foda.