Даны длины сторон треугольника. Вычислить его площадь. Изобразить решение задачи в виде алгоритмов: линейный, циклический и разветвляющийся. Изучить код программы, реализовать его в программе и прикрепить скриншоты с результатом. Program Geron;
var
a,b,c:real;{длины сторон треугольника}
p:real;{полупериметр треугольника}
s:real;{площадь треугольника}
begin
write (‘Введите длины сторон треугольника:’);
readln (a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
write (‘Площадь треугольника равна’,s)
end. {Geron}
Выполнить программу для случаев, если:
a=13, b=14, c=15
a=5, b=5, c=6
a=17, b=65, c=80

ШАТАНТРУБА    3   09.02.2021 13:43    1