blob: 36966cdd13a613836d58da54e971b8c5d02ac9a8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
//Finding of Work Done ,Vane Angles
//Given
D=0.5;
D1=1;
Vw1=0;
Vf=3;
Vf1=3;
g=9.81;
rho=1000;
N=250;
//To Find
u=(%pi*D*N)/60;
u1=(%pi*D1*N)/60;
Vw=Vf/tan(%pi/12);
a=atand(Vf/(Vw-u));
b=atand(Vf1/u1);
W=(Vw*u)/g;
E=(W/10);
disp("Inlet Vane Angle ="+string(a)+" degrees");
disp("Outlet Vane Angle ="+string(b)+" degrees");
disp("Work Done ="+string(W)+" N-m/N");
disp("Efficiency ="+string(E)+" Percentage");
|
