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

12 Авг 2021 в 19:42
133 +1
1
Ответы
1

var a,b,s,h: real;

begin

write ('введите длину основания');

read (b);

write ('введите длину высоты');

read (h);

s:=1/2*b*h;

a:=sqrt(sqr(b)/2);

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

writeln ('Боковые стороны равны =',a);

end.

13 Авг 2021 в 23:13
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир