Даны основание и высота равнобедренного треугольника. вычислить площадь и длины боковых сторон этого треугольника . В ПАСКАЛЕ ABC

1
Буквы?
Я составил программу нахождения площади и сторон равнобедренного треугольника, зная длину высоты и основания
ну вы скиньте как вы решили
Ну что?
спасибо) всё получилось)

Ответы и объяснения

  • SkyBy
  • главный мозг
2013-11-27T20:05:33+04:00
Var a,b,h,s: real;
begin
write ('Введите длину основания: '); read (b);
write ('Введите длину высоты: '); read (h);
s:=1/2*b*h;
a:=sqrt(sqr(b)/2);
writeln ('Площадь = ',s);
writeln ('Боковые стороны равны = ',a);
end.