calculo de salario por servico

[LeaandrooR]

Pessoal, sou bem iniciante no visualg, para ser mais exato 1 dia auheuaehaueh e estou com duvida em algoritmo que eu fiz, sera que vocês podem dar uma olhadinha e corrigir o que estar errado?

Var
servico, nome : caracter;
salario,salario1, salario2, horas : real
Inicio
escreva ( " Informe o nome do funcionario: ")
leia (nome)
escreva (" Informe o serviço do funcionario(Caixa,Faxineira ou Empacotador: ")
leia (servico)
escreva (" Informe as horas de serviço do funcionario: ")
leia (horas)
escolha servico
caso "Faxineira"
salario :=(18*horas)
Escreva "O Funcionario " ,nome, "recebe um salario de R$",salario, " pela funçao de Faxineira"
escolha servico
caso "empacotador"
salario1 :=(13*horas)
Escreva "O Funcionario " ,nome, "recebe um salario de R$",salario1, " pela funçao de Empacotador"
escolha servico
caso "caixa"
salario2 :=(20*horas)
Escreva "O Funcionario " ,nome, "recebe um salario de R$",salario2, " pela funçao de Caixa"
fimescolha
fimalgoritmo

 

[devair1010]

@LeaandrooR    seu código está quase certo, só errou ali no escolha, que não precisa repetir esse escolha servico;   E não precisa de parenteses para fazer os cálculos neste caso e coloque   escrevaL   para escrever algo assim ele escreve e pula para a próxima linha;    E precisa fazer a identação do código para ficar mais fácil de entender o código .   veja como ficou o código já ajeitado e identado :
 

Algoritmo "primeiro programa"
Var
servico, nome : caracter;
salario,salario1, salario2, horas : real
Inicio
  escreva ( " Informe o nome do funcionario: ")
  leia (nome)
  escreva (" Informe o serviço do funcionario(Caixa,Faxineira ou Empacotador: ")
  leia (servico)
  escreva (" Informe as horas de serviço do funcionario: ")
  leia (horas)
  escolha servico
    caso "Faxineira"
      salario := 18*horas
      Escreval("O Funcionario ",nome," recebe um salario de R$",salario," pela funçao de Faxineira")
    caso "empacotador"
      salario1 := 13*horas
      Escreval("O Funcionario ",nome," recebe um salario de R$",salario1," pela funçao de Empacotador")
    caso "caixa"
      salario2 := 20*horas
      Escreval("O Funcionario ",nome," recebe um salario de R$",salario2," pela funçao de Caixa")
  fimescolha
fimalgoritmo