GJPassos

APS 3 EX 2

Apr 7th, 2013
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.55 KB | None | 0 0
  1. algoritmo "APS 3 EX 2"
  2. // Função : Calcular media de salarios
  3. // Autor : Gilmar Junior dos Passos
  4. // Data : 07/04/2013
  5. // Seção de Declarações
  6. var
  7. contador: inteiro
  8. tfolha, msalarial, val1: real
  9.  
  10. inicio
  11. // Seção de Comandos
  12. para contador de 1 ate 3 faca
  13. escreval ("Entre com o valor do Salario:")
  14. leia (val1)
  15. tfolha <- (tfolha + val1)
  16. contador <- (contador + 1)
  17. fimpara
  18. msalarial <- (tfolha / contador)
  19.  
  20. escreval ("O Total da folha de pagamento é: ",tfolha," R$.")
  21. escreval ("A média salarial é de: ",msalarial," R$.")
  22. fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment