Заданы координаты трех Вершин треугольника (x1, y1), (х2, y2), (x3, y3). найти его периметр и площадь.

как я понимаю.

сама задание выглядит так:

Задан массив из н элементов. определить

1) сколько различных элементов в массиве

2) Удалить повторные появления каждого элемента

вот текст программы

program p;
var n, i, k, j: integer;
a:array[1..50] of integer;
begin
readln (n);
for i:=1 to n do
readln (a[i]);
i:=1;
while i<=n-1 do
begin
j:=i+1;
while j<=n do
if a[i]=a[j] then
begin
for k:=j+1 to n do
a[k-1]:=a[k];
n:=n-1
end
else j:=j+1;
end;
writeln (n);
for i:=1 to n do
writeln (a[i])
end.

РЕШЕНИЕ)

Карточка 1.

1. Вычислите дробную часть среднего арифметического трех заданных чисел.

2. Составьте программу вычисления идеального веса человека по его росту, при условии. что идеальный вес (кг)=(рост(см) - 100

3. Рассчитайте, сколько очков набрала команда по хоккею, если известно, что m встреч онавыиграла (2 очка), n встреч она проиграла (0 очков) и k встреч - ничья (1 очко).

4.1 Дано целое число. Определить является ли оно четным.

4.2 Дано целое число. Определить оканчивается ли оно цифрой 7.

Карточка 2. ( необходимо знание формул по физике)

1. Даны объем и массы двух тел из разных материалов. Материал какого из тел имеет большую плотность?

2. Известны напряжения двух не соединенных друг с другом участков электрическлй цепи и напряжения на каждом из них. По какому участку протекает меньший ток?

2.переведите числа из одной системы счисления в другую :
10101^2=А^10
10101^8=A^10
10101^16=A^10
3.Какое из чисел 110011^2 , 111^4,35^8 является наибольшим а какое наименьшим ?

(X1,Y1)(X2,Y2)(X3,Y3)(X4,Y4)(X5,Y5) соответственно. Найти площадь этого пятиугольника используя в качестве подпрограммы a) функцию

своих вершин. Вычислить радиус окружности, вписанной в треугольник

покупатель и какова сдача? Задача №2 В классе N учеников. После контрольной работы получено А-"5", В-"4", С-"2". Определить процент троек? Задача №3. Заданы координаты №-х вершин треугольника (х1, у1), (х2, у2 ), (х3, у3). Найти периметр и площадь. Задача №4. Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объём этого куба