Предмет:
ИнформатикаАвтор:
VolkgStormprogram z_8;
var x1, y1, x2, y2, x3, y3, P, p2, S, a, b, c: real;
begin
write('Координаты первой точки (через пробел)'); read(x1, y1);
write('Координаты второй точки (через пробел)'); read(x2, y2);
write('Координаты третьей точки (через пробел)'); read(x3, y3);
a:=sqrt(sqr(x2-x1)+sqr(y2-y1));
b:=sqrt(sqr(x3-x2)+sqr(y3-y2));
c:=sqrt(sqr(x3-x1)+sqr(y3-y1));
P:=a+b+c;
p2:=P/2;
S:=sqrt(p2*(p2-a)*(p2-b)*(p2-c));
writeln('Периметр: ', P);
writeln('Площадь: ', S);
end.
Автор:
Fedoseewa27Добавить свой ответ
Предмет:
Русский языкАвтор:
Григорян Ксения РобертовнаОтветов:
Смотреть
Предмет:
Русский языкАвтор:
Григорян Ксения РобертовнаОтветов:
Смотреть
Предмет:
МатематикаАвтор:
мегамозгОтветов:
Смотреть
Предмет:
БиологияАвтор:
михаил петровичОтветов:
Смотреть