summaryrefslogtreecommitdiff
path: root/2330/CH2/EX2.7/ex2_7.sce
blob: 316e940ddf7019a03ac97fa1c3242f7469a17399 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
// Example 2.7
clc;
clear;
close;
format('v',5)
// given data
Vin= 10;// in V
V_K= 0.7;// in V
Vout=0;// in V
R_L= 1000;// in kΩ
r_B= 20;// in Ω
// The peak forward current,
I_P= (Vin-V_K)/(R_L+r_B);// in A
// The peak voltage 
V_P= I_P*R_L;// in V
// The peak inverse voltage 
PIV= Vin-Vout;// in V
disp(V_P,"The peak voltage in volts is : ");
disp(PIV,"The peak inverse voltage in volts is : ")