Длина стороны треугольника равна a, периметр равен p, длины двух других сторон равны между собой. Найдите эти длины.
я так поняла,что нужна только формула. P = a+b+c b = с возьмём их за х b + с = х*2 P = а + х*2 х*2 = Р-а Надеюсь,что помогла
var a,b,c,p:integer;
begin
readln(a,p);
b:=(p-a)/2;
c:=b;
writeln('b=',b,' c=',c);
readln();
end.