Como calcular desvio padrão em VB.NET - VB.NET para Matemática e Estatística

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' conjunto dos dados
    Dim conjunto As Double() = {10, 30, 90, 30}
    Dim soma As Double = 0.0 ' soma dos elementos
    Dim desvio_padrao As Double = 0.0 ' desvio padrão
    Dim tam As Integer = conjunto.Length ' tamanho dos dados

    ' vamos somar todos os elementos
    For i As Integer = 0 To tam - 1
      soma = soma + conjunto(i)
    Next

    ' agora obtemos a média do conjunto de dados    
    Dim media As Double = soma / tam

    ' e finalmente obtemos o desvio padrão
    For i As Integer = 0 To tam - 1
      desvio_padrao = desvio_padrao + Math.Pow(conjunto(i) - media, 2)
    Next

    ' mostramos o resultado
    Console.WriteLine("Desvio Padrão Populacional: " &
      Math.Sqrt(desvio_padrao / tam))
    Console.WriteLine("Desvio Padrão Amostral: " &
      Math.Sqrt(desvio_padrao / (tam - 1)))

    Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub

End Module