Tempo de Serviço

augustofilho — Dec 22, 2013, 4:49 PM

e22p66=function(sal_base,tempo){
  if(sal_base<200)
    imposto=0
  else
    if((sal_base>=200) && (sal_base<=450))
      imposto=0.03*sal_base
  else
    if((sal_base>=451.01) && (sal_base<700))
      imposto=0.08*sal_base
  else
      imposto=0.12*sal_base
  cat("O valor do imposto eh de R$",imposto,"reais.")
 if(sal_base>500)
 {
   if(tempo<=3)
      grat=20
      else
      grat=30
 }
 else
 {
   if(tempo<=3)
     grat=23
   else
     if(tempo<6)
       grat=35
   else
     grat=33
 }
 cat("\nO valor da gratificacao eh de R$",grat,"reais.")
 sal_liq=sal_base-imposto+grat
 cat("\nO valor do salario liquido eh de R$",sal_liq,"reais.")
 if(sal_liq<=350)
   cat("\nClassificacao A")
 else
   if(sal_liq<600)
     cat("\nClassificacao B")
 else
   cat("\nClassificacao C")
}

e22p66(650,2)

O valor do imposto eh de R$ 52 reais.
O valor da gratificacao eh de R$ 20 reais.
O valor do salario liquido eh de R$ 618 reais.
Classificacao C