Jensen

Ola Pessoal, Boa noite, sou novo aqui no fórum, mas vi que sempre que possível podemos tirar algumas duvidas.. Comecei a aprender programação sozinho e estou usando como auxilio o VISUALG Para desenvolver meus algoritmos, Tenho material de apoio e sempre tento resolver sozinho ( a maioria das vezes sofro mas consigo) Minha intenção é simplesmente entender qual meu erro logico no seguinte problema. Desenvolvi este algoritmo que calcula o adicional noturno de um funcionário com base em algumas informações fornecidas, o problema é que quando o programa pede ao usuário para digitar o salario, se este digitar usando um ponto (.) ex (1.800) o programa retorna o resultado do adicional noturno com um zero antes como um numero decimal, Ex( 0.315) No entanto se o usuário digita o salario sem o ponto, o programa retorna o resultado correto sem o Zero Como deveria editar algoritmo para que o resultado seja sempre coerente, independente do que o usuário digite? Var // Seção de Declarações das variáveis valorhora: real adicionalporhora: real horascontratuais: inteiro salario: real jornada: inteiro diastrabalhados: inteiro folgas: inteiro adicionalnoturnototal: real nome: caracter jornadadeadicional: inteiro qtdhorasadicionais: real horasadicionaismes: inteiro Inicio // Seção de Comandos, procedimento, funções, operadores, etc... Escreval("Oi, Para iniciar digite seu nome") leia ( nome) escreval("") escreval (nome," Digite seu salario") leia (salario) escreval("") escreval(nome," Digite suas folgas no mes") leia (folgas) escreval("") escreval(nome," Digite sua jornada total na noite de trabalho") leia (jornada) escreval("") escreval("O adicional noturno eh valido das 22:00 ate as 5:00 portanto ") escreval ("digite quantas horas de Adicional notunro você se encaixa") leia(jornadadeadicional) escreval("") diastrabalhados <- 30 - folgas horascontratuais <- diastrabalhados*jornada valorhora <- salario/horascontratuais adicionalporhora <- valorhora*0.2 horasadicionaismes <- diastrabalhados*jornadadeadicional adicionalnoturnototal <- horasadicionaismes*adicionalporhora Escreval ("Ola ",nome," voce trabalha ",horascontratuais," horas por mes,com um salario base de ",salario) escreval("") escreval ("Portanto sua hora de trabalho vale ",valorhora," R$ Logo, seu adicional noturno sera no valor de ",adicionalnoturnototal," R$ mensais") escreval("") Fimalgoritmo