AULA 16

apos reprovação de mais ou menos 80% da turma o professor acabou sedendo e resolveu explicar com mais calma os assuntos de repetição e adorei isso porque agora abri a cabeça e to entendendo mais fasil os problemas, segue 2 exercicios que o prf.Jossandro nos passou.

1- Um supermercado deseja reajustar os preços de seus produtos usando o seguinte critério: o produto poderá ter seu preço aumentado ou diminuído. Para alterar o preço o produto deve preencher pelo menos um dos seguintes requisitos a seguir:

Venda média	Preço atual	% de aumento	% de diminuição
<500	< R$ 30,00	10	-
>= 500 e < 1.200	>= R$ 30,00 e < R$ 80,00	15	-
>= 1.200	>= R$ 80,00	-	20

Faça um programa que receba o preço atual e a venda mensal média do produto, calcule e mostre o novo preço.


algoritmo "exec_01_aula16"
var
   m,p,valor:real
inicio
   escreva("Digite a média mensal de vendas: ")
   leia(m)
   escreva("Digite preço do produto: ")
   leia(p)
   se (m<500) ou (p<30) entao
      valor<-(p+((p/100)*10))
   senao
      se ((m>=500) e (m<1200)) ou ((p>=30) e (p<80)) entao
         valor<-(p+((p/100)*15))
      senao
         se (m>=1200) ou (p>=80) entao
            valor<-(p-((p/100)*20))
         fimse
      fimse
   fimse
   escreva("O novo preço é de",valor,".")
fimalgoritmo

2-Faça um programa que apresente os 8 primeiros números de fibonacci.
   0, 1, 1, 2, 3, 5, 8, 13, 21, 34...


algoritmo "exec_02_aula16"
var
   n1,n2,r,x:inteiro
inicio
   n1<-0
   n2<-1
   escreva(n1)
   escreva(n2)
   para x de 1 ate 8 faca
      r<-n1+n2
      escreva(r )
      n1<-n2
      n2<-r
   fimpara
fimalgoritmo

depoisdesse comesei a achar fasil esse negocio de algoritmos e to me adequando cada ves mais a melhorar
cada minuto que tenho livre pego papel e caneta e bolo eu mesmo programas para minha resolução