summaryrefslogtreecommitdiff
path: root/1802/CH7/EX7.17/Exa7_17.sce
blob: 2c79823adcde3586bae1da697b3cc81ea340cc6a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Exa 7.17
clc;
clear;
close;
//Given data : 
format('v',7);
V=200;//in volt
I=1;//in A/m
R=2*0.05/1000;//in ohm/m
l=1*1000;//in meter
IT=I*l;//in Ampere
RT=R*l;//in ohm
VD=IT*RT/8;//in volt
Vmin=V-VD;//in volt
disp(Vmin,"Minimum potential occurs at the mid point & is(in V) : ");