Создать программу вычисления площади треугольника по известным значениям длин его стороны: a,b,c.

Var a,b,c,p,s:real;
begin
write (Введите длину стороны a: );
readln (a);
write (Введите длину стороны b: );
readln (b);
write (Введите длину стороны c: );
readln (c);
p:=(a+b+c)/2;
s:=SQRT(p*((p-a)*(p-b)*(p-c)));
writeln (Площадь = ,s);
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку