Aula 21 – 29.06.2011 Logica e Algoritmos
A aula foi para praticar, foi dado 3 exercicios.
Segue os exercícios...
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:
Segue os exercícios...
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 "aula21_02"
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 "aula21_03"
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("O aluno tirou zero!")
fimse
fimpara
fimalgoritmo
Achei os exercícios tranqüilos, mas não fiz a 3, pois achei um pouco complicada.
