Skip to main content
1 de 2

Transformando algoritimo para o visualg

estou começando a estudar algoritmos, e para facilitar tento levar todos os algoritmos para o visualg. Eu estou com um algoritmo de exemplo mas não estou conseguindo transformar para o visualg alguém pode ajudar? Sei que "tamanho(frase)" eu mudo para Compr(frase) que vai me dar o numero de caracteres da frase. O problema é que não consigo chamar essa função.

Algoritmo: função inverte(entradas: frase) início resultado <- frase para i <- 1 até tamanho(frase)/2 faça aux <- frase[i] resultado[i] <- frase[tamanho(frase)-i+1] resultado[tamanho(frase)-i+1] <- aux próximo i fim

O que fiz até agora foi:

algoritmo "Teste"

var F: caracter

Funcao inverte(): caracter var

frase: vetor [1..20] de caracter
i, j: inteiro

inicio

 Para i de 1 ate Compr(F) faca
   frase[i] <- Copia(F; i, 1)
  FimPara
  j <- Compr(F)
  Para i de 1 ate Compr(F) faca
     Escreva (frase[j])
     j <- j - 1
  FimPara

FimFuncao inicio

 Escreva ("entre como a palavra: ")
 Leia (F)
 inverter(F)

fimalgoritmo