Aula 16 01.06.2011 Logica e Algoritmos Hoje a aula foi muito boa, mas muito mesmo, mas antes de tudo queria parabeniza o nosso professor jossandro pela atitude de vir conversar conosco e propor alguma mudanca depois de entregar a prova e ver que muitos alunos foram mal. E tambem foi somente hoje que realmente entendi os comandos "para e enquanto", tornando assim bem melhor o meu entendimento para fazer os algoritmos. 1- Um supermercado deseja reajustar os precos de seus produtos usando o seguinte criterio: o produto podera ter seu preco aumentado ou diminuido. Para alterar o preco o produto deve preencher pelo menos um dos seguintes requisitos a seguir: Venda media Preco atual % de aumento % de diminuicao <500 < R$ 30,00 10 - >= 500 e < 1.200 >= R$ 30,00 e < R$ 80,00 15 - >= 1.200 >= R$ 80,00 - 20 Faca um programa que receba o preco atual e a venda mensal media do produto, calcule e mostre o novo preco. algoritmo "aula16_01"varm,p,valor:realinicioescreva("Digite a media mensal de vendas: ")leia(m)escreva("Digite preco do produto: ")leia(p)se (m<500) ou (p<30) entaovalor<-(p+((p/100)*10))senaose ((m>=500) e (m<1200)) ou ((p>=30) e (p<80)) entaovalor<-(p+((p/100)*15))senaose (m>=1200) ou (p>=80) entaovalor<-(p-((p/100)*20))fimsefimsefimseescreva("O novo preco e de",valor,".")fimalgoritmo2-Faca um programa que apresente os 8 primeiros numeros de fibonacci.0, 1, 1, 2, 3, 5, 8, 13, 21, 34...algoritmo " aula16_02"varn1,n2,r,x:inteiroinicion1<-0n2<-1escreva(n1)escreva(n2)para x de 1 ate 8 facar<-n1+n2escreva(r )n1<-n2n2<-rfimparafimalgoritmo Aula 11 17.05.2011 Logica e AlgoritmosNessa aula foi passado mais 2 exercicios que seguem abaixo.6- Faca um programa que leia o numero "N" e que indique quantos valores inteiros e positivos devem ser lidos a seguir. Para cada numero lido, mostre uma tabela contendo o valor lido, mostre uma tabela contendo o valor e o fatorial desse valor:algoritmo "exec_06_aula11"varn,num,y,x:inteirofat:realinicioescreva("Numero de operacoes fatoriais: ")leia(n)para x de 1 ate n facaescreva("Escreva algum numero que deseje fatorar: ")leia(num)fat<-1para y de 1 ate num faca fat<-fat*y escreval(fat)fimparafimparafimalgoritmo7- Foi feita uma estatistica em cinco cidades brasileiras para coletar dados sobre acidentes de transito.Foram obtidas os seguintes dados:a)O codigo da cidade;b)Numero de veiculos de passeio (em 2010)c)Numero de acidentes de transito com vitimas (em 2010)Deseja-se saber:a)Qual o maior e o menor indice de acidentes de transito e a que cidade eles pertencem;b)Qual a media de veiculos nas cinco cidades juntas;c)Qual a media de acidentes de transito nas cidades com menos de 2000 veiculos de passeio.algoritmo "exec_07_aula11"varx,caros,acidentes,carosx,acidentesx,acidentesy,contador,acidentes_m,n:inteirocity,city_a,city_m_a:caracter //variaveis onde vai o nome da cidademedia_caros,media_a:realiniciocarosx<-0n<-5 //numero de vezes.acidentesx<-0acidentesy<-10000000contador<-0acidentes_m<-0para x de 1 ate n faca escreval("Digite a cidade, o numero de veiculos e o numero de acidentes com vitimas") escreva("Nome da cidade: ")leia(city)escreva("Escreva o numero de caros de ",city,": ")leia(caros)escreva("Escreva o numero de acidentes com vitimas de ",city,": ")leia(acidentes)carosx<-caros+carosxse (acidentes > acidentesx) entao acidentesx<-acidentes city_a<-cityfimsese (acidentesy = 0) entao acidentesy<-acidentesfimsese (acidentes < acidentesy) entao acidentesy<-acidentescity_m_a<-cityfimsese (caros>=2000) entao acidentes_m<-acidentes+acidentes_m contador<-contador+1fimselimpatelafimparamedia_caros<-carosx/nescreval("O maior numero de acidentes ocorre em ",city_a,".")escreval("O menor neumero de acidentes ocorre em ",city_m_a,".")escreval("A media de caros das 5 cidades sao",media_caros,".")media_a<-acidentes_m/contadorse (contador <> 0) entao escreval("A media de acidentes em cidades de mais de 2000 caros e",media_a,".")senao escreva("Nenhuma cidade tem mais de 2000 caros")fimsefimalgoritmoHoje teria que ter sido aula de ingles, mas como a