Numero M-Alternante

[edmec]

Buenos días compañeros,

Tengo un problema el quiero solicitar su valiosa ayuda. (solo busco un tip, idea que me pueda ayudar a resolver el problema)

El problema es el siguiente:

Un número entero positivo se dice M-alternante si : El primer dígito es par entonces los 2 dígitos siguientes deben ser impares, luego los tres siguientes dígitos deben ser pares y así sucesivamente.

Por ejemplo: 122357 es un número M-alternante de orden 3
Lo que no encuentro como hacer es para ir comparando si el primero es par, y luego los siguientes 2 de la cadena sean impares y luego los siguientes 3 de la cadena sean impares.

Les agradezco mucho cualquier tip que me puedan dar,

[drako_darpan]

Hola que tal, bueno no se muy bien que quieres hacer, pero tratare de darte una leve ayuda

Se me ocurre que obtengas el tamaño de los digitos y hagas un ciclo, para obtener digito por digito, con el substring.

Código C#:

nLongitud = Cadena.ToString().length;
bInicio = true;
nIncremento = 2;
nTotal = 2;
 
for( i = 0; i <= nLongitud; i++ )
{
   if( bInicio )
   {
       // solo se ejecute 1 vez
       Cadena.Substring(0,1).ToString();
       bInicio = false;
   }
   else
   {
       // Los demas de 2 en 2
       Cadena.Substring(nIncremento , nTotal );
       nIncremento += 2;
       nTotal += 2;
   }
}
 

Es lo que se me ocurre

[beinat]

Hola buenas noches:

Mi propuesta seria algo asi, esta probado y funciona(creo) habria que hacer muchos controles pero bueno, mi idea era:

1) lograr el primer digito y saber si es par o inpar para saber la secuencia
2)una vez sabido eso declaramos un control que empieze en 2 y se vaya incrementando
3)si el primer digito es par los siguientes digitos deben de ser inpar, por lo tanto comenzamos otro blucle desde 0 hasta 'control' y que vaya viendo si son inpar
4)al terminar ese segundo blucle, declaramos la variable 'par' a lo contrario que estaba antes, para asi en la proxima vuelta buscar lo contrario, es decir, si el primer digito es par la variable par sera true, por lo tanto los siguiente digitos deben de ser inpar, y al terminar esa busqueda declaramos par=false para asi en la siguiente vuelta buscar los siguintes pares

Código vb:

Private Sub comprobar_Click(sender As Object, e As EventArgs) Handles comprobar.Click
        Dim numeros As Integer = Convert.ToInt64(numero.Text)
        Dim alternante As Boolean
        Dim par As Boolean
        par = False
        Dim cuantos As Integer
        Dim control As Integer
        alternante = True
        Dim primer_digito As Integer = CInt(numero.Text.Substring(0, 1))
        If (primer_digito Mod 2 = 0) Then
            par = True
        End If
        cuantos = 0
        control = 2
        Dim j As Integer = 1
        Dim longitud As Integer = numero.TextLength
        For i = 1 To longitud
            cuantos = 0
            If (par = True) Then
                While (cuantos < control)
                    If (CInt(numero.Text.Substring(j, 1)) Mod 2 <> 0) Then
                    Else
                        alternante = False
                    End If
                    j = j + 1
                    i = i + 1
                    cuantos = cuantos + 1
                End While
                par = False
            Else
                While (cuantos < control)
                    If (CInt(numero.Text.Substring(j, 1)) Mod 2 = 0) Then
                    Else
                        alternante = False
                    End If
                    j = j + 1
                    i = i + 1
                    cuantos = cuantos + 1
                End While
                par = True
            End If
            control = control + 1
        Next
        If (alternante = True) Then
            MessageBox.Show("el numero es m-alternante")
        Else
            MessageBox.Show("El numero no es m-alternante")
        End If
 

faltaria hacer controles de longitudes,es decir si ingresas 122333 te va a dar bien, pero si metes 1223 te va a dar un error porque faltan numero, pero eso ya lo dejo para que le des tu un par de vueltas.

Espero haberte ayudado, igual un poco larga la explicacion, pero creo que el tema lo requeria para explicarme bien.

Espero una respuesta tuya, para poder seguir ayudandote.

Un saludo