path: root/1370/CH2/EX2.9/example2_9.sce

//example2.9
clc
disp("P=4, A=P=4, Z=480")
disp("psi=20mWb=20*10^-3 Wb, I_a=50 A")
t=(0.159*0.02*50*4*480)/4
format(7)
disp(t,"Now,  T_a(in N-m)=0.159*(psi)*(I_a)*(P*Z)/A=")