summaryrefslogtreecommitdiff
path: root/2213/CH3/EX3.10/ex_3_10.sce
blob: bed15fb6679fe9ca4087ca57baa76dc9e4d1c2c2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//Example 3.10 // quantity of electricity and time taken
clc;
clear;
close;
//given data :
d=0.1;//in m
l=.25;// in m
Tc=2;// thickness of coating in mm
D=8.9;//density of metal in gm/CC
C_density=160;//in A/sq
I_efficiency=0.9;
S=%pi*d*l;
m=S*Tc*10^-3*D*10^3;
Z=30.43*10^-8;// in kg/C
Q=(m/Z)/3600;// in A-h
Q_dash=Q/I_efficiency;
disp(Q_dash,"quantity of electricity,Q_dash(A-h) = ")
I=C_density*S;
t=Q_dash/I;
disp(t,"time required,t(hours) = ")