Antonio Carlos Nenê Crepaldi

var
   cont:inteiro
   modelo,outro:caracter
inicio
   escreva("entre com o modelo do calçado: ")
   leia(modelo)
   escolha modelo
   caso "mocassim"
      escreval("o modelo do calçado é masculino.")
   caso "rasteirinha"
      escreval("o modelo do calçado é feminino.")
   SENAO
   OUTROCASO
      escreval("o calçado é infantil.")
   fimescolha
fimalgoritmo