summaryrefslogtreecommitdiff
path: root/1730/CH2/EX2.23/Exa2_23.sce
blob: 7ed4e60c0fa90d8600795c23e9cec762ff3f029a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Exa2.23
clc;
clear;
close;
//given data
V=220;// in V
W=100;//in watt
R100=V^2/W;//in ohm
alpha20=0.005;
t1=20;
t2=2000;
// since R100=R20*[1+alpha20*(t2-t1)]
R20=R100/(1+alpha20 * (t2-t1));
I20=V/R20;
disp("Current flowing at the instant of switching on a 100 W metal filament lamp is : "+string(I20)+" A")