algoritmo de velocidad en pseint