0

Este programa de pseudocódigo Visualg pretende implementar a função remover

Sintaxe: remover(cad, indice, quantidade)

O argumento cad pode ser qualquer string. A posição do índice (pos) especifica de qual posição do strig original começará a ser removido. (base 1)
quantidade é o comprimento da substring a ser extraída da string original mais longa

Exemplo: A instrução Escrever (eliminar(str, indice, quantidade)); quando indice <- 13 e quantidade <- 3 e a variável cad carregada com a Caractere "Programação 1" deve escrever a string "Programação".

O programa compila, mas exibe exatamente o mesmo texto inserido nele

Algoritmo "semnome"

Var
   indice, quantidade : Inteiro
   cad, stringresultante : Caractere
   tam, i : Inteiro

Funcao remover (cad: caractere; indice, quantidade: inteiro): Caractere
inicio
  tam <- compr(cad)
  stringresultante <- ""
    // Copia el inicio de la cadena
    Para i de 1 ate quantidade faca
        stringresultante <- copia(cad,i,i)
    FimPara

    Enquanto indice <= tam Faca
        Se indice + quantidade >= tam Entao
            stringresultante <- copia(cad,indice + quantidade,indice + quantidade)
        Fimse
        indice<-indice+1;
    FimEnquanto
    Retorne cad
FimFuncao

Inicio

  Escreval("Digite a string : ")
    Leia (cad)

    Escreval("Insira a posição para iniciar a extração: ")
    Leia (indice)

    Escreval("Digite o comprimento da substring: ")
    Leia (quantidade)

    stringresultante <- remover(cad, indice, quantidade)

    Escreva (stringresultante)

Fimalgoritmo

1 Resposta 1

1

Você deveria retornar a variável stringResultante lá na função.

retorne stringResultante

Se o objetivo fosse ir concatenando os sub-textos, seria algo como:

para i de 1 ate quantidade faca
    stringResultante <- stringResultante  + copia(cad, i, i)
fimPara

Em fim... eu não consegui entender muito bem a lógica do laço de repetição. Rara resumir, basicamente poderia copiar o que vem antes da remoção, e concatenar com o que vem depois da remoção... Algo como:

funcao remover (str: caractere; indice, quantidade: inteiro): Caractere
inicio
   retorne copia(str, 1, indice-1) + copia(str, indice+quantidade, compr(str))
fimFuncao

Texto com 10 números e após removido 2 a partir do índice 4

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .