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

Question

Информатика

Варнава

13 марта, 14:58

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

+1

Ответы (1)

Знаете ответ на вопрос?

Лела · Answer 1

Если это Паскаль, то вот:

program prog1;

var h, a: integer;

P, b, S: real;

begin

write ('Высота=') ;

readln (h) ;

write ('Основание=') ;

readln (a) ;

S:=h*a/2;

b:=sqrt ((a/2) * (a/2) + h*h) ;

P:=b+b+a;

writeln ('Периметр = ', P) ;

writeln ('Площадь = ', S) ;

end.