como calcular o valor de (pi) no visualg

var
aux : inteiro
serie, serie2, den, den2, num : real
inicio
// Seção de Comandos
para aux de 1 ate 10000 faca
   num <- 1
   den <- aux*4-3
   serie <- serie+(num/den)
   den2 <- aux*4-1
   serie <- serie-(num/den2)
fimpara
serie <- 4*(serie)
escreval("O valor de PI é: ", serie)
fimalgoritmo

aa

Visualg é um programa de implementação de algoritmos, com uma linguagem próxima ao Português estruturado, que é um pseudocódigo escrito em português.

O pseudocódigo é mostrado abaixo:

Assim, o valor de (pi) pode ser calculado no visualg com o pseudocódigo acima.