diff options
Diffstat (limited to '278/CH20/EX20.7/ex_20_7.sce')
-rwxr-xr-x | 278/CH20/EX20.7/ex_20_7.sce | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/278/CH20/EX20.7/ex_20_7.sce b/278/CH20/EX20.7/ex_20_7.sce index 5caa24356..332434f8f 100755 --- a/278/CH20/EX20.7/ex_20_7.sce +++ b/278/CH20/EX20.7/ex_20_7.sce @@ -1,23 +1,23 @@ -//find..
-clc
-//soltuion
-//given
-n=10
-v=25//m/s
-P=115*1000//W
-q=%pi
-B=22.5//deg
-u=0.2
-m=0.6//kg/m
-//let T1 and T2 be tension on tight and slag side
-//P=(T1-T2)*v*n//W
-//T1-T2=460...eq1
-//log(T1/T2)=u*q*cosec(%pi/180*B)=0.714
-T2=T1/5.18//....eq2
-//from eq1 and eq2
-T1=570//N
-T2=110//N
-Tc=m*v^2
-Tt1=T1+Tc
-Tt2=T2+Tc
-printf("the value of Tt1 and Tt2 is,%f N\n,%f N",Tt1,Tt2)
+//find.. +clc +//soltuion +//given +n=10 +v=25//m/s +P=115*1000//W +q=%pi +B=22.5//deg +u=0.2 +m=0.6//kg/m +//let T1 and T2 be tension on tight and slag side +//P=(T1-T2)*v*n//W +//T1-T2=460...eq1 +//log(T1/T2)=u*q*cosec(%pi/180*B)=0.714 +//T2=T1/5.18//....eq2 +//from eq1 and eq2 +T1=570//N +T2=110//N +Tc=m*v^2 +Tt1=T1+Tc +Tt2=T2+Tc +printf("the value of Tt1 and Tt2 is,%f N\n,%f N",Tt1,Tt2)
\ No newline at end of file |