Создать программу для вычисления площади и периметра треугольника по заданным длинам сторон - VB

  Dim dA As Double
  Dim dB As Double
  Dim dC As Double
  '
  Dim dP As Double
  Dim dS As Double
  '
  dA = 5.1
  dB = 8.4
  dC = 3.9
  ' Периметр
  dP = dA + dB + dC
  ' Площадь
  dS = ((dP / 2) * ((dP / 2) - dA) * ((dP / 2) - dB) * ((dP / 2) - dC)) ^ 0.5