Preço do produto de um supermercado

augustofilho — Dec 21, 2013, 3:10 PM

e16p61=function(preco_atual,venda_mensal){

  if((venda_mensal<500)|| (preco_atual<30))
    novo_preco=preco_atual*1.10

  else 

if(((venda_mensal>=500) && (venda_mensal<1200)) || ((preco_atual>=30) && (preco_atual <80)))
   novo_preco=preco_atual*1.15

  else

  if(((venda_mensal>=1200) || (preco_atual>=80)))
    novo_preco=preco_atual*0.80

cat("O preco do produto eh de R$",novo_preco,"reais.")

}