2. заданы координаты трех вершин треугольника (х, , , y3) - найти его периметр и площадь. c++

//Dev C++ 4.9.9.2

#include <iostream>
#include <cmath>
using namespace std;

int main(){
 int x1,x2,x3,y1,y2,y3=0;
 double s,p,a,b,c,pp=0;
 cin>>x1>>y1>>x2>>y2>>x3>>y3;
 a=sqrt(pow(float(x2-x1),2)+pow(float(y2-y1),2));
 b=sqrt(pow(float(x3-x2),2)+pow(float(y3-y2),2));
 c=sqrt(pow(float(x3-x1),2)+pow(float(y3-y1),2));
 p=a+b+c;
 pp=p/2;
 s=sqrt(pp*(pp-a)*(pp-b)*(pp-c));
 cout<<"S="<<s<<endl;
 cout<<"P="<<p;
 cin.get();
 cin.get();
 return 0;
}

Пример ввода:
1
1
1
5
6
7
Пример вывода:
S=10
P=17.1954

Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10

// PascalABC.NET 3.0,сборка 1076
begin
  var n:=ReadInteger('Длина последовательности: ');
  var a:=ArrRandom(n,-50,50);
  Writeln('Исходная последовательность');
  a.Println;
  Writeln('Сумма элементов: ',a.Sum);
  Write('Кол-во четных, кратных пяти: ');
  Writeln(a.Where(x-> x mod 10 = 0).Count)
end.

Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1

Алгоритм оказания первой что при оказании первой вам ничего не угрожает и вы не подвергаете себя опасности.Обеспечить безопасность пострадавшему и окружающим (например, извлечь пострадавшего из горящего автомобиля).Проверить наличие у пострадавшего признаков жизни (пульс, дыхание, реакция зрачков на свет) и сознания. Для проверки дыхания необходимо запрокинуть голову пострадавшего, наклониться к его рту и носу и попытаться услышать или почувствовать дыхание. Для обнаружения пульса необходимо приложить подушечки пальцев к сонной артерии пострадавшего. Для оценки сознания необходимо (по возможности) взять пострадавшего за плечи, аккуратно встряхнуть и задать какой-либо вопрос.