Номер 1: Даны основание а и периметр Р равнобедренного треугольника.Составь программу...

Question

Номер 1:
Даны основание а и периметр Р равнобедренного треугольника.Составь программу определяющую боковые стороны треугольника
Номер 2:
Даны боковая сторона С и периметр Р равнобедренного треугольника.Составь программу определяющую основание этого треугольника.
ПОМОГИ ПОЖАЛУЙСТА

Answer 1

#1
var
  a,p:real;
begin
  readln(a,p);
  writeln('Боковые стороны:',(p-a)/2,' и ',(p-a)/2);
end.
-----------------------------------------------
#2
var
  c,p:real;
begin
  readln(c,p);
  writeln('Основание:',p-c-c);
end.

Comments

а второе?

---

тут 2 #1 и #2

---

все увидела спасибо