diff options
Diffstat (limited to '980/CH5/EX5.2/5_2.sce')
-rwxr-xr-x | 980/CH5/EX5.2/5_2.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/980/CH5/EX5.2/5_2.sce b/980/CH5/EX5.2/5_2.sce new file mode 100755 index 000000000..4ad49442d --- /dev/null +++ b/980/CH5/EX5.2/5_2.sce @@ -0,0 +1,11 @@ +clc;
+clear;
+format('e',11)
+Q=1*10^-9;
+r0=[3 5 6];
+r1=[0 0 0];
+R01=r1-r0;
+disp("The parametric eqution of the straight line joining these two points:")
+disp("z=6(1-t)","y=5(1-t)","x=3(1-t)"); //using r=r0+tR01.
+W=1305*Q*integrate('(1-t)^3','t',0,1); //using parametric equation.
+disp(W,"work done(in joule)=");
|