Написать программу позволяющую вычислить площадь и периметр треугольника с любыми сторонами. SUB PRIMER1

Question

Написать программу позволяющую вычислить площадь и периметр треугольника с любыми сторонами. SUB PRIMER1

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

Program tr; var a,b,c,per,pl:extended; begin readln(a,b,c); per:=a+b+c; pl:=sqr((per/2-a)*(per/2-b)*(per/2-c)); Writeln('Площадь=' + pl+'Периметр='+per); end;