Atividade II Algoritmo

algoritmo "semnome"
// Função :
// Autor :
// Data : 31/03/2015
// Seção de Declarações var valor:real inicio escreva("Entre com um valor: ") leia(valor) se valor < 20 entao valor <- valor + (valor*0.45) senao valor <- valor + (valor*0.30) escreva("O valor de venda é de,",valor) fimse // Seção de Comandos
Fimalgoritmo

algoritmo "semnome"
// Função :
// Autor :
// Data : 31/03/2015
// Seção de Declarações var sal:inteiro calc:real inicio calc <- sal - (sal*20/100) escreva("Insira o salário bruto: ") leia(sal) se sal <= 600 entao escreva("Isento") senao se sal <=1200 entao escreva("O valor a receber é de ,", sal-sal*0.2) senao se sal <=2000 entao escreva("O valor a receber é de ,", sal-sal*0.25) senao se sal >2000 entao escreva("O valor a receber é de,", sal-sal*0.3)

fimse fimse fimse fimse // Seção de Comandos
Fimalgoritmo

algoritmo "semnome"
// Função :
// Autor :
// Data : 31/03/2015
// Seção de Declarações var destino:caractere ida_volta:logico inicio
Escreva("Digite a região: norte/nordeste/centroeste/sul:") leia(destino) escreva("Digite se é ida ou idAevolta: ") leia(ida_volta) se (destino = "norte")entao escreva("Ida é 500$ e ida e volta é 900$") senao se (destino = "nordeste") entao escreva("Ida é 350$ e ida e volta é 650$") senao se (destino = "centroeste") entao escreva("Ida é de 350$ e ida e volta é 600$") senao se (destino = "sul") entao escreva("Ida é de 300 e ida e volta é de 550$")

fimse fimse fimse fimse // Seção de Comandos
Fimalgoritmo

algoritmo "Q4"
// Função :
// Autor :
// Data : 31/03/2015
// Seção de Declarações var macas:inteiro valorCompra:real inicio escreval("Numero de macãs: ") leia(macas) se macas <12 entao valorCompra <- macas*1.30 senao valorCompra <- macas*1.00 fimse escreval("Valor da compra ", valorCompra)
// Seção de Comandos

Fimalgoritmo

algoritmo "semnome"
// Função :
// Autor :
// Data : 31/03/2015
// Seção de Declarações var aux,m,m1,h,h1:real inicio escreval("Digite idade do homem: ") leia(h) escreval("Digite