3769/CH10/EX10.12/Ex10_12.sce


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

clear
//Given
n=10
I=3
A=7.85*10**-3
B=10**-2                         //T

//Calculation
//
M=n*I*A
U1=-M*B*cos(0)
Uf=-M*B*cos(90)
w=-U1
t=M*B*sin(90*3.14/180.0)

//Result
printf("\n Work done is %0.1f  *10**-3 Nm",t*10**3)