1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Programação VB6

Discussão em 'Programação' iniciada por flip, 4 de Fevereiro de 2009. (Respostas: 2; Visualizações: 818)

  1. flip

    flip Power Member

    Pessoal estou aqui de volta de um exercício de programação em que, de entre um determinado intervalo de números tenho de encontrar todas as capicuas e afixa-las numa listbox. A minha dificuldade está em fazer a função que me analise os números desse mesmo intervalo e diga se são ou não capicua. Alguém me pode dar uma ajuda?

    Obrigado.
     
  2. Boas.

    Uma maneira de fazer isso era fazer uma função que comparasse o 1º dígito com o último, o 2º dígito com o penúltimo, e por aí a diante, com um ciclo repetitivo. Isso dava um bocado de trabalho.

    Uma capicua é um número (ou palavra) que se lê de frente para trás e de trás para a frente da mesma maneira. Ou seja, o número tem que ser igual a ele mesmo, mas com a ordem invertida.
    Uma pequena pesquisa, mesmo no VB6, e descobre-se a função StrReverse(<string>), que inverte uma String.
    Ou seja, basta converter o número para string, inverter a "string" e verificar se é igual à string do número inicial.

    Esta é uma forma muito simples de resolver o problema.

    Espero ter-me feito perceber.
     
    Última edição: 4 de Fevereiro de 2009
  3. flip

    flip Power Member

    Realmente era muito simples... Obrigado! ;)
     

Partilhar esta Página