Информатика, опубликовано 2018-08-22 19:25:50 by Гость
Определить периметр и площадь треугольника. Задать длины сторон самостоятельно.
Ответ оставил Гость
Program n1;
var a,b,c,s,p:real;
begin
readln(a);
readln(b);
readln(c);
if (a+b>c) and (a+c>b) and (b+c>a) then
begin
p:=a+b+c;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(периметр=,p);
writeln(площадь=,s);
end else
writeln(треугольник не существует);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на