Informática, perguntado por rosaguilengue9959, 1 ano atrás

como resolver esse algorítimos no visualg??? O funcionário recebe um valor fixo de salário e, conforme o valor de venda mensal que deve ser lido pelo algoritmo, ele recebe também uma comissão calculada sobre o valor de venda mensal. A comissão do funcionário é calculada da seguinte forma: - Funcionários que vendem de R$ 55.000,00 até R$ 100.000,00 por mês recebem uma comissão de 2% sobre o valor total da venda. - Funcionários que vendem menos de R$ 55.000,00 recebem uma comissão fixa de R$ 100,00. - Funcionários que vendem mais de R$ 100.000,00 por mês recebem R$ 5.000,00 fixos de comissão.

Soluções para a tarefa

Respondido por bokomoko
1
eu faria assim, a alma desse programa é o ninho de se's
algoritmo vendamensal
var  vendamensal,comissao  : real
inicio
    escreval("Informe a venda mensal")
    leia(vendamensal)
    se vendamensal < 55000 entao 
         comisao <- 100
    senao    // se deu senao a vendamental é >= 55000, nao precisa testar
          se vendamensal <= 100000 entao 
                  comissao <- vendamensal * 0.02   // 0.02 = 2%
          senao   /// se deu esse senao, a vendamensal é > 100.000
                   comissao <- 50000 
          fimse
     fimsenao
     escreval("a comissao é ",comissao) 
fimalgoritmo

Madara00: Parabéns.. Aprovado !
Respondido por reinaldocunha9
0

Resposta:

Algoritmo "comissao"

Var

         salario,venda, comissao: real

inicio

      Escreva("Digite o salario base: ")

      Leia (salario)

      Escreva("Digite o valor total venda do vendedor no Mês: ")

      Leia (venda)

      se (venda >= 55000) e (venda <=100000) entao

             comissao <- venda* (2/100)

             Escreval("Bônus Recebido : ", comissao)

             salario <- salario + comissao

      fimse

      se venda < 55000 entao

             comissao <- 100

             Escreval("Bônus Recebido : ", comissao)

             salario <- salario + comissao

      fimse

      se venda > 10000 entao

             comissao <- 5000

             Escreval("Bônus Recebido : ", comissao)

             salario <- salario + comissao

      fimse

      Escreva("Salário Final : ", salario)

fimalgoritmo

Explicação:

Anexos:
Perguntas interessantes