Skip to main content

estouEstou 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

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

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


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

FimFuncao
inicio

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


fimalgoritmo

fimalgoritmo

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

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
Fonte Link

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