algoritmo "tela de login" VisualG

algoritmo "tela de login"
// Função :
// Autor :
// Data : 19/09/2017
// Seção de Declarações
var
login:caracter
senha:inteiro
inicio
// Seção de Comandos
escreval("digite a seu login")
leia(login)
escreval("digite a sua senha")
leia(senha)
se((login="lael")e(senha=123))entao
escreval("logado - perfil aberto")
senao
escreval("login ou senha invalidos - se loga ai se poder")

fimse

fimalgoritmo