Programación General > Visual Basic para principiantes

 Ejercicio Sos

(1/2) > >>

paolaam:
hola, bueno despues de mucho intentos no he podido hacer este pequeño programa, me han pedido realizar una funcion para saber si un numero es palindromo por ejemplo el 121 que si se voltea es lo mismo esdecir si es palindromo.

solia usar visual basic pero no recuerdo muy bien, en este programa yo trato de hacer la comparacion de 2 numeros "n" ademas usando la  funcion do while pero me apaecen muchos errores, agradeceria si me dijeran si voy por el camino correcto o que puedo hacer
gracias de antemano

AnioN:
pone el codigo que hiciste hasta ahora, nadie aqui te va a realizar la tarea.

paolaam:
Function cadinvertida(cadena As String) As String
Dim invertida() As String
Dim i As Integer
Dim j As Integer
n = Len(cadena)
ReDim invertida(n)
For i = 1 To n
invertida(i - 1) = Mid(cadena, i, 1)
Next i
For j = (n - 1) To 0 Step -1
cadinvertida = cadinvertida & invertida(j)

End Function

Epa:
Buenas.

Si solo lo usas para probar numeros o cadenas sin espacios puedes hacer asi


--- Citar ---Private Function Palindromo(Cadena as String) as Boolean
  Dim Invertida as string

  Invertida = StrReverse(Cadena)

  If Cadena = Invertida then
    Palindromo = True
  Else
    Palindromo = False
  End If

End Function

--- Fin de la cita ---

Saludos  :hola:

paolaam:
vale gracias, eso lo puedo probar con la ventana de inmediato, me podrias decir de que forma gracias

Navegación

[0] Índice de Mensajes

[#] Página Siguiente