Как вычислить периметр треугольника, заданного координатами его вершин - VB

Формулировка задачи:

19 вариант Где тут ошибка?

Private Sub Command3_Click()
p = Lg(Abs(X))
v = Sqr(X + t) / (t ^ 2 + X ^ 2)
Y = p + v ^ 3
Text3.Text = Y
 
End Sub

Решение задачи: «Как вычислить периметр треугольника, заданного координатами его вершин»

textual
                            Листинг программы 
                        

                            Private Sub Command2_Click()
xA = 2
xB = 3
yA = 4
yB = 6
xC = 8
yC = 10
AB = Sqr((xB - xA) ^ 2 + (yB - yA) ^ 2)
BC = Sqr((xC - xB) ^ 2 + (yC - yB) ^ 2)
AC = Sqr((xC - xA) ^ 2 + (yC - yA) ^ 2)
p = AB + BC + AC
Label3.Caption = p
End Sub
                        

Оцени полезность:

12 голосов , оценка 3.5 из 5

Похожие ответы