diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /964/CH9/EX9.5/9_5.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '964/CH9/EX9.5/9_5.sce')
-rwxr-xr-x | 964/CH9/EX9.5/9_5.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/964/CH9/EX9.5/9_5.sce b/964/CH9/EX9.5/9_5.sce new file mode 100755 index 000000000..b73d7fd3d --- /dev/null +++ b/964/CH9/EX9.5/9_5.sce @@ -0,0 +1,27 @@ +clc;
+clear;
+n=3;
+b(1)=7.85;
+b(2)=-19.3;
+b(3)=71.4;
+a=[3 -0.1 -0.2;0.1 7 -0.3;0.3 -0.2 10];
+for k=1:n-1
+ for i=k+1:n
+ fact=a(i,k)/a(k,k);
+ for j=k+1:n
+ a(i,j)=a(i,j)-fact*(a(k,j));
+ end
+ b(i)=b(i)-fact*b(k);
+ end
+end
+x(n)=b(n)/a(n,n);
+for i=n-1:-1:1
+ s=b(i);
+ for j=i+1:n
+ s=s-a(i,j)*x(j)
+ end
+ x(i)=b(i)/a(i,i);
+end
+disp(x(1),"x1=")
+disp(x(2),"x2=")
+disp(x(3),"x3=")
|