Programa Desarrollado en Matlab para Respuesta Dinámica con el Método Beta de Newmark