summaryrefslogtreecommitdiff
path: root/548/CH9/EX9.2/9_02.sce
blob: c6de3996aa6d6fe50be07a967bcb3931f2a85994 (plain)
1
2
3
4
5
6
7
pathname=get_absolute_file_path('9_02.sce')
filename=pathname+filesep()+'9_02data.sci'
exec(filename)
Pe=Pa*120/(n*Nmech*rpm*d);
disp(Pe,"Pe=","Pe=Pa*120/(n*Nmech*rpm*d)","mean effective pressure Pe:")
printf("\Answer:\n")
printf("\n\Mean effective pressure : %f N/m^2\n\n",Pe)