Составить программу нахождения боковой стороны равнобедренного треугольника, если основание и периметр вводятся с клавиатуры.

Question

Составить программу нахождения боковой стороны равнобедренного треугольника, если основание и периметр вводятся с клавиатуры.

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,P:integer; begin writeln('Введите периметр равнобедренного треугольника: '); read(P); writeln('Введите основание равнобедренного треугольника: '); read(a); writeln('Боковая сторона равнобедренного треугольника: ',(P-a)/2); end.