Exercício De Algoritmos

EXERCÍCIO DE ALGORÍTMOS

1- Escreva um programa que calcula o valor do imposto de renda de uma pessoa física, com as seguintes condições:

se o salário >= 3.000 alíquota será 15%.

Se 3.000>salário>=1.500 alíquota será 7%.

Se salário < 1.500 alíquota isenta.

O Sistema deve ter como entrada de dados o Nome do Contribuinte, o CPF e o Salário Mensal, como resultado deve-se mostrar o Valor Anual = Salario Mensal * 12 (meses) e o Valor do Imposto de Renda = Valor Anual * Alíquota de IR (de acordo com as condições acima)

var

nome, cpf: caracter

sal_mensal,valoranual,imposto:real

inicio

// Seção de Comandos

Escreva("Nome: ")

leia(nome)

Escreva("CPF(utilize caracteres): ")

leia(cpf)

Escreva("Salário mensal: ")

leia(sal_mensal)

valoranual<-sal_mensal*12

se (sal_mensal>=3000) entao

imposto<-(valoranual*15)/100

escreva("O imposto pago por ",nome, " é: ", imposto)

fimse

se (sal_mensal<3000) e (sal_mensal>=1500) entao

imposto<-(valoranual*7)/100

escreva("O imposto pago por ",nome, " é: ", imposto)

fimse

se (sal_mensal<1500) entao

imposto<-(valoranual*0)

Escreva (nome, " não paga imposto de renda!")

fimse

fimalgoritmo

var

nome:caracter

peso,altura,IMC:real

inicio

// Seção de Comandos

Escreva("Nome: ")

leia(nome)

Escreva("Peso: ")

leia(peso)

Escreva("Altura: ")

leia(altura)

IMC<-peso/(altura)^2

se (IMC<18.5) entao

escreva("O índice de massa corporal de: ",nome," é: ",IMC," e está abaixo do peso!")

fimse

se (IMC>=18.5) e (IMC<25) entao

escreva("O índice de massa corporal de: ",nome," é: ",IMC," e está com o peso normal!")

senao

se (IMC>=25) e (IMC<30) entao

escreva("O índice de massa corporal de: ",nome," é: ",IMC," e está acima do peso!")

senao

se (IMC>=30) entao

escreva("O índice de massa corporal de: ",nome,"