Найти периметр и площадь треугольника по данным трем сторонам

@Konfetkaliliya · Регистрация: 21.01.2013

Студворк — интернет-сервис помощи студентам

1.Даны действительные положительные числа а,в,с, которые являются длинами сторон треугольника. Напишите программу, позволяющую найти периметр треугольника и площадь треугольника.

Новичок · 23.01.2013, 18:15

Pascal

program dv;
uses Crt;
var a,b,c,p,s:real;
begin
ClrScr;
Write('a=');
Readln(a);
Write('b=');
Readln(b);
Write('c=');
Readln(c);
if (a+b>c) and (a+c>b) and (b+c>a) then
begin
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
p:=p*2;
Writeln('P=',p:0:2);
Writeln('S=',s:0:2);
end else Writeln('Стороны треугольника заданы неверно!!!');
Readln;
end.

@Konfetkaliliya 0 / 0 / 0 Регистрация: 21.01.2013 Сообщений: 32
		1
	Найти периметр и площадь треугольника по данным трем сторонам 23.01.2013, 16:39. Показов 33779. Ответов 1 Метки нет (Все метки) 1.Даны действительные положительные числа а,в,с, которые являются длинами сторон треугольника. Напишите программу, позволяющую найти периметр треугольника и площадь треугольника. 0

Опции темы

Найти периметр и площадь треугольника по данным трем сторонам

Решение