summaryrefslogtreecommitdiff
path: root/964/CH9/EX9.5/9_5.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /964/CH9/EX9.5/9_5.sce
downloadScilab-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-x964/CH9/EX9.5/9_5.sce27
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=")