summaryrefslogtreecommitdiff
path: root/3673/CH16/EX16.3/Ex16_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3673/CH16/EX16.3/Ex16_3.sce')
-rw-r--r--3673/CH16/EX16.3/Ex16_3.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3673/CH16/EX16.3/Ex16_3.sce b/3673/CH16/EX16.3/Ex16_3.sce
new file mode 100644
index 000000000..44210f90d
--- /dev/null
+++ b/3673/CH16/EX16.3/Ex16_3.sce
@@ -0,0 +1,22 @@
+//Example 16_1 page no:739
+clc;
+//given
+I1=1;//here I1 is assumed to 1 hence it will cancel out in simplifications
+I2=1;//here I1 is assumed to 1 hence it will cancel out in simplifications
+V1=6*I1;
+V2=5*I1;
+function [x] = frac(n, d)
+ x = (n*%s)/(d*%s);
+endfunction;
+x=frac(V1,V2);
+disp(x,"the parameter A is");
+x=frac(I1,V2);
+disp(x,"the parameter C is");
+V1=-17;
+I2=5;
+x=frac(-V1,I2);
+disp(x,"the parameter B is");
+V1=-7;
+I2=5;
+x=frac(-V1,I2);
+disp(x,"the parameter C is");