Ademir: atualizando funçao rand