三角形面积

记得当时接触海伦公式还是在高三（18）班，没想到这么多年过去了，感谢当时的数学老师的教诲

---

符号说明：

H 面积

a,b,c三角形的三边长

s 周长的一般

画个示意图或许就更明白了

Mathematica

(*Mathematica,于2022-5-20,求三角形面积*)
s = (a + b + c)/2;(*三角形周长的一半*)
h[a_, b_, c_] = Sqrt[s*(s - a)*(s - b)*(s - c)];(*海伦公式*)
(*测试一下*)
h[3, 4, 5]

MATLAB

%MATLAB  于2022-5-20 三角形面积
clc;clear all;
Area=H(3,4,5)

function H = H(a,b,c)
s=(a+b+c)/2;
H=sqrt(s*(s-a)*(s-b)*(s-c));
end

Python

# python 于2022-5-20 求三角形面积
def Area(a,b,c):
    s = (a+b+c)/2
    H = (s*(s-a)*(s-b)*(s-c))**(1/2)
    return H
print("三角形的面积为: " + str(Area(3,4,5)))

---

LINGO

model:
title:求三角形的面积;
!集合段;
sets:
rows/1/:a,b,c;
endsets
 
!数据段;
data:
a=3;
b=4;
c=5;
enddata

!计算段;
calc:
s=(a(1)+b(1)+c(1))/2;
h=@sqrt(s*(s-a(1))*(s-b(1))*(s-c(1)));
!可以用for，但是我感觉就一个没必要;
@write("三角形面积是：",h,@newline(1));
endcalc

end

Excel

我感觉这种事还是用Excel最佳

=SQRT(SUM(A3:C3)*0.5*(SUM(A3:C3)*0.5-A3)*(SUM(A3:C3)*0.5-B3)*(SUM(A3:C3)*0.5-C3))