«Сандық әдістер»



бет355/451
Дата12.03.2018
өлшемі34,89 Mb.
#39184
1   ...   351   352   353   354   355   356   357   358   ...   451
Программасы:

program logranzh;

const n=4;

var i,q,j,k:integer;

x,yx,h,rx,pi1,pi2:real;

xi,yi:array[1..n] of real;

begin

x:=pi/12;



writeln(x:2:7);

xi[1]:=pi/6;

xi[2]:=pi/4;

xi[3]:=pi/3;

xi[4]:=pi/2;

yx:=0;


for j:=1 to n do

begin


pi2:=1;

pi1:=1;


for i:=1 to 4 do

begin


if i<>j then pi2:=pi2*(xi[j]-xi[i]);

pi1:=pi1*(x-xi[i]);

end;

yx:=yx+(pi1*sin(xi[j]))/((x-xi[j])*pi2);



end;

write('yx=');

writeln(yx:2:6);

write('sin(pi/12)=');

writeln(sin(x):2:6);

write('ostatok=');

write(sin(x)-yx:1:6);

readln;


end.
3-есеп.

y=lg(x) функциясының мәндері 4-кестеде берілген, lg1001 мәнін табу керек.

3-ретті шектік айырымдар тұрақты бола бастағандықтан кестені толтыруды тоқтатамыз. Формулада n=3 деп аламыз. Q=0,1. x=1001. Ньютонның бірінші формуласын қолданамыз, себебі х-тің мәні кестенің бас жағында жатыр, сонда lg1001=3.00043417+0.5*10-9 болатынын қалдық мүшенің формуласын қолдану арқылы анықтаймыз.

4-кесте . y=lg(x) функциясының мәндері және



шектік айырымдары кестесі

X

Y







1000

3.0000000

43 214

-426

8

1010

3.0043214

42 788

-418

9

1020

3.0086002

42 370

-409

8

1030

3.0128372

41 961

-401




1040

3.0170333

41 560







1050

3.0211893











Достарыңызбен бөлісу:
1   ...   351   352   353   354   355   356   357   358   ...   451




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет