summaryrefslogtreecommitdiff
path: root/629/CH6/EX6.10/example6_10.sce
blob: 1d9a468f56af7208c59e71a22e3e291fc923c38c (plain)
1
2
3
4
5
6
7
8
9
10
clear
clc
//Example 6.10 JET IMPINGING ON MOVING BLOCK
A=5*10^-4; //area[m^2]
rho=1000; //density[kg/m^3]
vj=50; //[m/s]
vb=25; //[m/s]
//Force on cart
F=rho*A*(vj-vb)^2 //[N]
printf("\n The frictional force acting on the block = %.f N.\n",F)