Як обчислити катет та площу прямокутного трикутника за заданими гіпотенузою та другим катетом в Pascal
Ответы
Ответ дал:
2
Ответ:
Объяснение:
Нужно знать:
1) теорему Пифагора: квадрат гипотенузы прямоугольного треугольника равен сумме квадратов его катетов: с² = а² + b², где a и b - катеты, c - гипотенуза. Отсюда катет можно выразить так:
а² = с² - b² или а = √(с² - b²);
2) площадь прямоугольного треугольника равна половине произведения его катетов: S = ab/2, где S - площадь, a и b - катеты;
3) для нахождения квадратного корня используется функция sqrt();
4) для нахождения квадрата выражения используется функция sqr().
Программа на Pascal:
program treugolnik;
var a,b,c,s:real;
begin
write('b='); readln(b);
write('c='); readln(c);
a;=sqrt(sqr(c)-sqr(a));
s:=a*b/2;
writeln('a=',a:5:2);
write('s=',s:5:2)
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад