Лучшие помощники

Megamozg 2205 б
Matalya1 1800 б
DevAdmin 1720 б
arkasha_bortnikov 900 б
Dwayne_Johnson 870 б

Показать еще

·

Информатика

1 апреля 2023 23:35

1215

Пусть даны длины сторон треугольника. Вычислите его площадь.

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.

0

·

Хороший ответ

3 апреля 2023 23:35

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Перевести два числа из десятичной системы счисления:123, 67 в двоичную систему счисления... Определить информационный объем сообщения "Я помню чудное мгновение!"... В каком из условных операторов допущена синтаксическая ошибка? 1. if B = then Writeln ('Деление на ноль невозможно'); 2. if a > b then max:= a els... Что хранится в оперативной памяти?... Перепишите программу на языке Паскаль, исправив ошибки: Program primer Var a,b: integer; Begin ; ReadLn( a,b); s=a+b; m:=a*b; d:=a:b; WriteLn(s); Writ...