VisualG Função strcat no visualG

[devair1010]

No visualG a união de string's,  é bem simples como na linguagem "Basic"  , bastando  para isso usar o operador "+"  como em uma adição  de inteiro , e as string's serão juntadas em apenas uma ,    e se  no visualG  precisasse de uma função para isso ,  como na linguagem C , então tal função poderia ser assim :

Algoritmo "strcat teste_325"
// Data atual  : 28/10/2024
funcao strcat( st1, st2 : caractere ) : caractere
var
   f  : inteiro                      // variAveis locais
   ch : caractere                    // só existem dentro dessa funCAo
inicio
   para f de 1 ate compr( st2 ) faca // percorre o comprimento da string 2
      ch <- copia( st2, f, 1 )       // copia um caractere da string 2
      st1 <- st1 + ch                // adiciona o caractere no final
   fimpara                           // da string 1
   retorne st1                       // retorna a string concatenada
fimfuncao
Var
   string_1, string_2 : caractere
   string_retornada   : caractere
Inicio
   string_1 <- "String "
   string_2 <- "Concatenada."
   string_retornada <- strcat( string_1, string_2   )
   escreval ( "Concatenação De String's No vsualG:" )
   escreval ( string_retornada )
   escreval ( "" )
Fimalgoritmo

 

[Simon Viegas]

@devair1010, um detalhe: o método seria um procedimento, pois a alteração é feita diretamente na string de origem. Não tem retorno para isso. Seria algo como:

 

   string_1 <- "String "
   string_2 <- "Concatenada."
   strcat(string_1, string_2)
   escreval("Concatenação De String's No vsualG:" )
   escreval(string_1) //"String Concatenada."
   escreval("")

 

De qualquer forma, acho que o uso desse método por aqui não tem muita relação, pois, pelo que vi, lá no C teria relação com o fato dele tratar uma string como "vetor de ponteiros de letras"... É uma paradigma bem diferente.