Fórum Algoritmo - Tomada de Decisão Por Seleção #571143

01)

Alguém consegue SABER , porque esse código , não está funcionando no VISUALG ?

Algoritmo "mesporextenso"
// Disciplina : [Linguagem e Lógica de Programação]LIVRO : ALGORITMO
// Autor(a) : José Augusto e Jayr Figueiredo
// Data atual : 16/11/2016
Var
// Seção de Declarações das variáveis
MES: INTEIRO

Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
Escreva ("MES")
Caso MES
Seja 1 Faca
Escreva ("Janeiro")
Leia(JANEIRO)
Seja 2 faca
Escreva ("Fevereiro")
Leia(FEVEREIRO)
Seja 3 faca
Escreva ("Março")
Leia(MARCO)
Seja 4 faca
Escreva ("Abril")
Leia(ABRIL)
Seja 5 faca
Escreva ("Maio")
Leia(MAIO)
Seja 6 faca
Escreva ("Junho")
Leia (JUNHO)
Seja 7 faca
Escreva ("Julho")
Leia(JULHO)
Seja 8 faca
Escreva ("Agosto")
Leia (AGOSTO)
Seja 9 faca
Escreva ("Setembro")
Leia(SETEMBRO)
Seja 10 faca
Escreva ("Outubro")
Leia (OUTUBRO)
Seja 11 faca
Escreva ("Novembro")
Leia(NOVEMBRO)
Seja 12 faca
Escreva ("Dezembro")
Leia (DERZEMBRO)
SeNao
Escreva ""Valor Inválido")

FimCaso

Fimalgoritmo


02)

Esse aqui também não está funcionando :

algoritmo "MÊS"
// Função :
// Autor :
// Data : 17/11/2016
// Seção de Declarações
Var
// Seção de Declarações das variáveis
m: inteiro

inicio
// Seção de Comandos
escreva ("informe o número correspondente ao mês: ")

leia(m)
caso m
Seja m 1 Faca
escreva ("janeiro")

leia(m)
caso m
Seja 2 Faca
escreva ("Fevereiro")

leia(m)
caso m
Seja 3 Faca
escreva ("Março")

leia(m)
caso m
Seja 4 Faca
escreva ("Abril")

leia(m)
caso m
Seja 5 Faca
escreva ("Maio")

leia(m)
caso m
Seja 6 Faca
escreva ("Junho")

leia(m)
caso m
Seja 7 Faca
escreva ("Julho")

leia(m)
caso m
Seja 8 Faca
escreva ("Agosto")

leia(m)
caso m
Seja 9 Faca
escreva ("Setembro")

leia(m)
caso m
Seja 10 Faca
escreva ("Outubro")

leia(m)
caso m
Seja 11 Faca
escreva ("Novembro")

leia(m)
caso m
Seja 12 Faca
escreva ("Dezembro")


senao
se m > 12 entao
escreva(" valor não corresponde a nenhum mês ")

FimCaso

FimAlgoritmo