Значения функции f(x)=cosx заданы в точках x=x0(hx)xn . Определить количество точек функции , расположенных выше прямой y=0.5 и ниже прямой y=-0.5 .
НАПИСАТЬ ПРОГРАММУ НА ПАСКАЛЕ
Ответы
Ответ дал:
0
Ответ:
uses crt;
var x0,xn,h,x:real;
k:integer;
begin
clrscr;
write('Начало интервала x0=');
readln(x0);
repeat
write('Конец интервала xn>',x0:0:1,' xn=');
readln(xn);
until xn>x0;
repeat
write('Шаг вычислений h<',xn-x0:0:1,' h=');
readln(h);
until h<xn-x0;
x:=x0;
k:=0;
while x<=xn+h/2 do
begin
writeln('x=',x:4:1,' y=',sin(x):6:3);
if (sin(x)>-0.5)and(sin(x)<0.5) then k:=k+1;
x:=x+h;
end;
writeln('Количество точек между прямыми y=-0.5 и y=0.5 = ',k);
readln
end.
Объяснение:
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
8 лет назад