Напишите программный код на языке Паскаль для вычисления модуля разности максимального и минимального значений y, если y=((tg x)^3)*sin x, -2pi<=x<=2pi, при шаге pi/4.
295
397
Ответы на вопрос:
program fun;
uses Math;
const pi = 3.14;
var x, y, min_, max_: real;
begin
x := -2 * pi;
min_ := -1000000;
max_ := 1000000;
while (x <= 2 * pi) do begin
y := power(sin(x) / cos(x), 3) * sin(x);
if (y > max_) then
max_ := y;
if (y < min_) then
min_ := y;
x += pi / 4;
end;
WriteLn(abs(max_ - min_));
end.
Популярно: Информатика
-
mlizim21.12.2022 12:01
-
KotyaFila25.07.2021 21:42
-
emilityan01.04.2022 01:20
-
okcanatsarenko02.01.2023 14:57
-
Zaayeva23.07.2021 17:01
-
samoilenkoludmi09.07.2020 02:22
-
23v14.05.2020 10:23
-
dayana2007204.09.2021 11:31
-
SolekProAwp06.05.2020 08:45
-
irinacheprasova27.02.2023 16:35