Aula 05 Exercicio 04

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "Aula 05 - Exercicio 04"
Var
Elevador,Usuario:inteiro
Movimento:inteiro
Inicio
escreval ("Entre com andar em que o elevador está parado: ")
leia (Elevador)
Se (Elevador < 0) ou (Elevador > 4) entao
 escreva ("O elevador está fora do prédio" )
senao
 escreval ("Entre com andar em que o usuário está: ")
 leia (Usuario)
 se (usuario < 0) ou (usuario > 4) entao
 escreva ("O usuário está fora do prédio" )
 senao
 Movimento:=usuario - elevador
 se Movimento > 0 entao
 escreva ("O elevador sobe ", movimento, " andar" )
 se movimento <> 1 entao
 escreva ("es")
 fimse
 senao
 se movimento < 0 entao
 movimento:=movimento*-1
 escreva ("O elevador desce ", movimento, " andar" )
 se movimento <> 1 entao
 escreva ("es")
 fimse
 senao
 escreva ("O elevador não se movimenta" )
 fimse
 fimse
 fimse
Fimse
Fimalgoritmo