Exemplo 21

=====================================================
Exemplo 21:

Escreva um algoritmo para ler o salário mensal atual de um funcionário e o percentual de reajuste.Calcular e escrever o valor do novo salário.
=====================================================
// Seção de Declarações

var
salario,reajuste,novosalario:real

inicio

// Seção de Comandos

escreval("Salario atual:")
leia(salario)
escreval("Reajuste em porcento:")
leia(reajuste)

reajuste<-reajuste/100

novosalario<-(reajuste*salario)+salario

escreval("Novo salario: ",novosalario)

fimalgoritmo

=====================================================