100 БАЛЛОВ
Напишите программный код на языке Паскаль для вычисления модуля разности максимального и минимального значений у, если y = tgx³ · sin x, x ∈ [–2π; 2π], при шаге π/4
Напишите программный код на языке Паскаль для вычисления модуля разности максимального и минимального значений у, если y = tgx³ · sin x, x ∈ [–2π; 2π], при шаге π/4
More Questions From This User See All
Answers & Comments
Ответ:
program z;
var x,y,mx,mn:real;
begin
x:=-2*pi;
mx:=tan(x*x*x)*sin(x);
mn:=tan(x*x*x)*sin(x);
while x<=2*pi do
begin
y:=tan(x*x*x)*sin(x);
writeln('x = ',x:6:3,'y = ':7,y:0:3);
if y>mx then mx:=y;
if y<mn then mn:=y;
x:=x+pi/4
end;
write('|',mx:0:3,' - (',mn:0:3,')| = ',abs(mx-mn):0:3)
end.