Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 17:52
843
Пусть даны длины сторон треугольника. Вычислите его площадь.
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
Остались вопросы?
Еще вопросы по категории Информатика
Сколько существует трехзначных чисел, все цифры которых различны?...
Выведите все точные квадраты натуральных чисел, не превосходящие данного числа N. Входные данные Задано единственное целое число N Выходные данные...
Чему равна сумма элементов а[1] и а[4] массива,сформированного след.образом: for i:=1 to 5 do a[i]:+i*(i+1)...
Сканируется цветное изображение размером 25*30 см. Разрешающая способность сканера 300*300 dpi, глубина цвета- 3 байта. Какой информационный объем буд...
Какая кнопка или кнопки позволит(лят) тебе осуществить отмену операции? CTRL с любой стрелкой CTRL + C CTRL + V CTRL + Z CTRL + A ALT+ F4...