.


:




:

































 

 

 

 


-




Scilab . :

Windows XP;

Scilab, 3.3.2

 


 

 


 

. - . GUI , , , Exel.

: 50 .


, . : .

, . , :

(1)

(2)

, :

(3)

, , :

, (4)

:

(5)

 

, :

, (6)

, , :


(7)


3.2

inter():

 

   
: X , Y- , flag , X_inp- ,  
 
X_out-
 
3
n=size(X); N=n(2); X m=size(X_inp); M=m(2); X_inp
flag= =0
 
Y_out[1][ i]=0; X_out[i]=X_inp[i]
1 i:=1; i<M;
 
 
1 i=i+1
 
 
 
 
 
2 i:=1; i<M;
 
Yout
 
 

 

L2=L2*((X_inp(i)-X(k))/(X(j)-X(k)));
3 j:=1; j<N;
 
L1:=1 L2:=1
 
4 k:=1; k< j-1;
 
(j-1)
(j-1)  
L1=L1*((X_inp(i)-X(k))/(X(j)-X(k)));
4 k=k+1
5 k:=j+1; k< N;
 
L2=L2*((X_inp(i)-X(k))/(X(j)-X(k)));
(j-1)
 
 
 
 
 
 
 

 

 


 

5 k=k+1
3 j=j+1
(j-1)
 
 
2 i=i+1
Y_out(1,i)=Y_out(1,i)+ +L1*L2*Y(j)
 
 
 
Yout
 
 
 
 

 

6,7,8 d
D=N-1;
6 i:=1; i< D;
 
 
 
 
 
 

 

 


 

 
d
d(i,1)=Y(i+1)-Y(i);
6 i=i+1
 
 
7 i:=2; i< D;
8 j:=1; j< D-i+1;
 
d(j,i)=d(j+1, i-1)-d(j, i-1);
8 j=j+1
7 i=i+1
 
 
 
 
 
9 i:=1; i< M;
 
9,10, 11 Yout  
 
 
 
 

 


11 jj=jj+1
 
Y_out(1, i)=1;
 
10 ii:=1; ii< D;
k(i, ii)=1;
11 jj:=1; jj< ii;
 
k(i, ii)=k(i, ii)*(X_inp(i)-X(jj));
11 jj=jj+1
10 ii=ii+1
 
Y_out(1, i)=Y_out(1, i)+(d(1, ii)*k(i, ii)/(factorial(ii)*((X(2)-X(1))^ii)));
 
 
 
 
 
 
 
 
 
 
 

 

 


9 i=i+1
Yout
 
 
 
 
 
 

 

 

-

- inter() Scilab Console, [Yint]=inter(X, Y, Xint, flag). -.

, Scilab Console : help inter, .

 






:


: 2015-10-21; !; : 325 |


:

:

, - , ; , - .
==> ...

1466 - | 1472 -


© 2015-2024 lektsii.org - -

: 0.016 .