Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- algoritmo "ex04_repREF"
- // Renato ex04_repeticaoREFORÇO
- var
- entrada: real
- inicio
- escreval("Informe a senha:")
- leia(entrada)
- enquanto (entrada)<>(2002) faca
- escreval("Senha Invalida")
- leia(entrada)
- fimenquanto
- escreval("Acesso permitido")
- fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement