Написать программу, которая печатает trye или false в зависимости от того, имеет ли уравнение:
Arctg(2^x-|p|) =корень из 2.
Корень на отрезке [а, b] для заданных чисел p, a, b.
Номер 2.
Приложения:
![](https://st.uroker.com/files/5f6/5f6fc6987ae16eb72bb98e89bd7ceba2.jpg)
Ответы
Ответ дал:
1
===== PascalABC.NET =====
begin
var (p, a, b) := ReadReal3('Введите p, a, b:');
var x := Ln(Tan(Sqrt(2)) + Abs(p)) / Ln(2);
Println(x.InRange(a, b))
end.
Объяснение:
arctg(2^x - |p| = √2
tg(arctg(2^x - |p|) = tg(√2)
2^x - |p| = tg(√2)
2^x = tg(√2) + |p|
x = ㏒₂( tg(√2) + |p| )
x = ㏑( tg(√2) + |p| ) / ㏑2
И теперь ответить, верно ли, что x ⊂ [a; b]
Приложения:
![](https://st.uroker.com/files/388/3880625933732d8904efd4e17b13936b.jpg)
maksim1359:
если я дам больше балов вы можете просто переделать, написать программу и сделать сам интерфейс(с скриншотом)?
p, a, b, x: real;
begin
Write('Введите p, a, b:');
Read(p, a, b);
x := Ln(Tan(Sqrt(2)) + Abs(p)) / Ln(2);
Writeln((x >= a) and (x <= b))
end.
Вас заинтересует
4 месяца назад
4 месяца назад
6 месяцев назад
2 года назад
2 года назад
7 лет назад
7 лет назад