summaryrefslogtreecommitdiff
path: root/548/CH4/EX4.26/4_26.sce
blob: a6f53b3a56523eecdca0d93287d654b8a95f3c29 (plain)
1
2
3
4
5
6
7
8
pathname=get_absolute_file_path('4_26.sce')
filename=pathname+filesep()+'4_26data.sci'
exec(filename)
Tw1=q*Cf1;disp(Tw1,"Tw1=","Tw1=q*Cf1","shear stress at 1 cm Tw1:");
Tw2=q*Cf2;disp(Tw2,"Tw2=","Tw2=q*Cf2","shear stress at 1 cm Tw2:");
printf("\Answer:\n")
printf("\n\Local shear stress at 1 cm: %f N/m^2\n\n",Tw1)
printf("\n\Local shear stress at 5 cm: %f N/m^2",Tw2)