Jump to content


Photo

Ajuda Urgente Nesse Algoritmo


  • Faça o login para participar
1 reply to this topic

#1 carlos wmp

carlos wmp

    Novato no fórum

  • Usuários
  • 2 posts
  • Sexo:Masculino

Posted 23/04/2011, 09:23

Amigos sou iniciante ainda na área de algoritmos e estou tentando fazer o exercicio aqui de algoritmos que está me deixando doido não consigo terminar ele e eu precisaria muito dele o mais rapido possivel fiz até um certo ponto só que depois disso não consigo ir adiante a conta no final sai negativa

Este é o Exercicio
Fazer um algoritmo para ajudar no cálculo do salário de um funcionário. O sistema deve pedir:
1 nome do funcionário
2 salário bruto
3 número de dependentes

E deve mostrar:
4 nome do funcionário e
5 salário líquido
Considere a seguinte regra para o cálculo:

Salário Líquido = Salário Bruto – Desconto INSS + (15,00 * Número de Dependentes) + Auxílio Passagem (40,00) + Auxílio Refeição (100,00)

Salário Bruto Desconto INSS
(Percentual sobre Salário Bruto)
Até R$ 510,00--------------------------8,00%
De R$ 510,00 a R$ 1020,00--------------9,00%
Acima de R$ 1020,00--------------------10,00%

Aew eu consegui fazer ele até aqui.
algoritmo "EXER-03"
// Função :
// Autor :
// Data : 20/4/2011
// Seção de Declarações
var
salariobruto:real
x,numdependentes:inteiro
nomefuncionarios:literal


inicio
para x de 0 ate 0 faca
escreva(x)
escrevaL("DIGITE O NOME DO FUNCIONARIO")
leia(nomefuncionarios)
escreval("DIGITE O SALARIO BRUTO")
leia(salariobruto)
escreval("DIGITE O NUMERO DE DEPENDENTES")
leia(numdependentes)
escreval("NOME DO FUNCIONARIO: ",nomefuncionarios)
se(salariobruto=510)entao
salariobruto<-(salariobruto*8/100-510)
escreval("SEU SALARIO LIQUIDO É: ", salariobruto+numdependentes*15+40+100)
fimse
fimpara
fimalgoritmo

quem puder me ajudar desde já agradeço muitooooo.

#2 carlos wmp

carlos wmp

    Novato no fórum

  • Usuários
  • 2 posts
  • Sexo:Masculino

Posted 25/04/2011, 14:28

Ninguém pode me ajudar ??? puts :(




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq