Заданы координаты трех вершин треугольника (x1, y1), (х2, y2), (x3, y3). найти его периметр и площадь. продолжите программу на паскаль! program нахождение площади и периметра треугольника; var x1, y1, x2, y2, x3, y3, a, b, c, p, d1, d2, d3, p, s: real; begin readln (x1, y1, x2, y2, x3, y3); d1: = sqrt (sqr(x2-x1) + sqr (y2-y1))
Kikookiko
3
18.05.2019 10:20
6
Другие вопросы по теме Информатика
цццрпппр1
12.09.2019 22:20
derevyaniy02
12.09.2019 22:20
ПолЕчка11117
12.09.2019 22:20
patik20001
12.09.2019 22:20
ksiuu
29.09.2019 13:50
PolinaSukova2
29.09.2019 13:50
ирина1834
30.05.2019 06:40
alinastoyka
04.07.2019 09:30
Популярные вопросы
- Найдите координаты точки пересечения параболы y=x^2-5x и прямой...
2 - Средние линии треугольника относятся как 1: 2: 3, а периметр...
3 - Написать письмо другу, только без переводчика, потому что это...
1 - Какие признаки я общими для хордовых...
2 - Под действием двух противоположно направленных сил,равных 5 и...
3 - А-5 : (-52\19)= -57\104 решить уравнение...
2 - Какие слова могут читаться с права на лево , так и с лева на...
3 - Запиши глаголы в форме единственного числа, 2 лица. выдели окончания....
1 - Из двух посёлков , расстояние между которыми 80км,одновременно...
3 - Сравните кутузова и наполеона в крации ,по характеру...
2
Program Нахождение площади и периметра треугольника;
var x1, y1, x2, y2, x3, y3, a, b, c, p, d1, d2, d3, P,p, S: real;
Begin
readln (x1, y1, x2, y2, x3, y3);
d1:= sqrt (sqr(x2-x1) + sqr (y2-y1));
d2:= sqrt (sqr(x3-x2) + sqr (y3-y2));
d3:= sqrt (sqr(x1-x3) + sqr (y1-y3));
P:= d1+d2+d3;
p:=P/2;
S:= sqrt(p*(p-d1)*(p-d2)*(p-d3));
end.