funcionando while,expr