Составить программу в Pascal...
1.Площадь треугольника по 3-м его сторонам:
Var a,b,c, P: integer;
PP, S: real;
Begin
(дальше)
Составить программу в Pascal...
1.Площадь треугольника по 3-м его сторонам:
Var a,b,c, P: integer;
PP, S: real;
Begin
(дальше)
1.Площадь треугольника по 3-м его сторонам:
Var a,b,c, P: integer;
PP, S: real;
Begin
(дальше)
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Write('Введите значение стороны a: ');
Readln(a);
Write('Введите значение стороны b: ');
Readln(b);
Write('Введите значение стороны c: ');
Readln(c);
P := a + b + c;
PP := P / 2;
S := sqrt(PP (PP - a) (PP - b) * (PP - c));
WriteLn('Площадь треугольника равна: ', S:0:2);
End.