summaryrefslogtreecommitdiff
path: root/3515/CH5/EX5.19/Ex_5_19.sce
blob: 51bf4c0838fbe936632d3b4d52af96a564c3460e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
// Exa 5.19
format('v',4);
clc;
clear;
close;
// Given data
A= 10^5;
Af= 100;
// Formula Af= A/(1+A*Bita)
Bita= 1/Af-1/A;

//when A= 10^3
A=10^3;
Af_desh= A/(1+A*Bita);

delta_Af= Af_desh-Af;
Perc_Change_inAf= delta_Af/Af*100;// in %
disp(Perc_Change_inAf,"Percentage change in Af is : ")