algoritmos , Portugol ou pseudoodigo

Em Pseudocódigo (Portugol) fica assim:

algoritmo "Calc-Comissao-Imposto"

var
slBase: real
comissao: real
slBruto: real
imposto: real
slLiquido: real

inicio
Escreva("-- Digite seu Salario Base: ")
Leia (slBase)

comissao <- 0.05 * slBase

slBruto <- slBase + comissao

imposto <- 0.07 * slBruto

slLiquido <- slBruto - imposto

limpatela
Escreval("---- RESULTADO ----")
Escreva("O valor do Salario: R$ ", slLiquido)
Escreval("")

fimalgoritmo

Utiliza-se o código:

Declara-se as variáveis:

var

   sal, grat, imp, desc, novoSal: real

Depois, digita-se o salário e ele calcula o novo salário com base na gratificação e impostos.

inicio

      escreva ("Digite o salário base do funcionário: ")

      leia (sal)

      grat <- sal * 0.05

      imp <- sal * 0.07

      desc <- sal - imp

      novoSal <- desc + grat

      escreva ("O salário do funcionário a receber é: ", novoSal)

// Seção de Comandos

fimalgoritmo

Utiliza-se o código:

Declara-se as variáveis:

var

   sal, grat, imp, desc, novoSal: real

Depois, digita-se o salário e ele calcula o novo salário com base na gratificação e impostos.

inicio

      escreva ("Digite o salário base do funcionário: ")

      leia (sal)

      grat <- sal * 0.05

      imp <- sal * 0.07

      desc <- sal - imp

      novoSal <- desc + grat

      escreva ("O salário do funcionário a receber é: ", novoSal)

// Seção de Comandos

fimalgoritmo