Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 17:52
673
Пусть даны длины сторон треугольника. Вычислите его площадь.
1
ответ
Var s,p,a,b,c:real;
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Площадь треугольника: ',s);
end.
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Площадь треугольника: ',s);
end.
0
·
Хороший ответ
4 апреля 2023 17:52
Остались вопросы?
Еще вопросы по категории Информатика
среди множеств книга, бензин, врач, молоко, строитель, учебник, жидкость, справочник, человек, найдите шесть пар, между которыми существует отношение...
Что такое синтаксис языка программирования...
1. Для долговременного хранения информации служит: А) оперативная память. Б) процессор. В) внешняя память 2. При отключении компьютера от сети информ...
между дачными поселками Арбатское, Бунеево, Веснянка, Гремячье, Дымово построены дороги протяженность которых в километрах приведена в таблице.... Пос...
Дана программа на языке программирования Pascal. progran z_1; var М : array [1..10] of integer; i, k: integer; begin begin for i:= 1...
Все предметы 
