Como calcular Média Harmônica em VisuAlg - VisuAlg para Matemática e Estatística

algoritmo "Como calcular Média Harmônica em VisuAlg"

var
  // variáveis usadas na resolução do problema
  valores: vetor[1..5] de real
  i, n: inteiro
  // para guardar a média harmônica
  media_harmonica: real
  // guarda a soma dos inversos dos elementos do conjunto
  soma: real

inicio
  // vamos criar um vetor com os valores do conjunto
  valores[1] <- 3
  valores[2] <- 9
  valores[3] <- 7
  valores[4] <- 2
  valores[5] <- 5

  // tamanho do vetor
  n <- 5

  // inicializa a soma como zero
  soma <- 0

  // vamos mostrar os elementos do conjunto
  escreva("Os elementos do conjunto são: ")