2135/CH7/EX7.1/Example7_1.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14

//Ex 7.1
clc;
clear;
close;
format('v',5);

//Given data :
T=10;//N-m
N=1500;//rpm
IP=1.85;//KW
//Calculation
BP=T*2*%pi*N/60/1000;//KW
FP=IP-BP;//KW
disp(FP,"Friction power(KW) : ");