initial commit / add all books

9 files changed, 83 insertions, 0 deletions

diff --git a/377/CH15/EX15.1/15_1.sce b/377/CH15/EX15.1/15_1.sce
new file mode 100644
index 000000000..0eadb41ac
--- /dev/null
+++ b/377/CH15/EX15.1/15_1.sce
@@ -0,0 +1,8 @@
+disp("T=Tr*Tnr/(Tr+Tnr)");

+Tr=60;

+Tnr=100;

+T=Tr*Tnr/(Tr+Tnr);

+printf('\n Total carrier recombination lifetime is %fnS',T);

+disp("η=T/Tr");

+n=T/Tr;

+printf('\n The internal quantum efficiency is %fpercent',n*100);
\ No newline at end of file
diff --git a/377/CH15/EX15.2/15_2.sce b/377/CH15/EX15.2/15_2.sce
new file mode 100644
index 000000000..2edc942b8
--- /dev/null
+++ b/377/CH15/EX15.2/15_2.sce
@@ -0,0 +1,10 @@
+P=10;//assumed for calculation purpose

+disp("Pin=0.5*P");

+printf('\n');

+Pin=0.5*P;

+disp("Pe=0.013*Pin");

+printf('\n');

+Pe=0.013*Pin;

+disp("ηext=Pe/p");

+n=Pe/P;

+printf('\n The external power efficiency is %fpercent',n*100);
\ No newline at end of file
diff --git a/377/CH15/EX15.3/15_3.sce b/377/CH15/EX15.3/15_3.sce
new file mode 100644
index 000000000..094fd9e09
--- /dev/null
+++ b/377/CH15/EX15.3/15_3.sce
@@ -0,0 +1,12 @@
+disp("η=no. of electrons collected/no. of incident photons");

+a=1.2*10^11;//say a=no. of electrons collected

+b=3*10^11;//say b=no. of incident photon

+n=a/b;

+printf('\n The value of quantum efficiency is %fpercent',n*100);

+disp("R=Ip/Po=n*e*λ/(h*c)");

+e=1.602*10^-19;

+d=0.85*10^-6;//say d=λ

+h=6.626*10^-34;

+c=2.998*10^8;

+R=n*e*d/(h*c);

+printf('\nThe value of R is %fA/W',R);
\ No newline at end of file
diff --git a/377/CH15/EX15.4/15_4.sce b/377/CH15/EX15.4/15_4.sce
new file mode 100644
index 000000000..79c872aa6
--- /dev/null
+++ b/377/CH15/EX15.4/15_4.sce
@@ -0,0 +1,14 @@
+disp("λ=c*h/E");

+h=6.626*10^-34;

+c=2.998*10^8;

+E=1.5*10^-19;

+d=c*h/E;

+printf('\nThe value of λ is %fμm',d*10^6);

+n=0.65;

+e=1.602*10^-19;

+R=n*e/E;

+printf('\nThe value of R is %fA/W',R);

+disp("Po=Ip/R");

+Ip=2.5*10^-6;

+Po=Ip/R;

+printf('\nThe required incident opticalpower is %fμW',Po*10^6);
\ No newline at end of file
diff --git a/377/CH15/EX15.5/15_5.sce b/377/CH15/EX15.5/15_5.sce
new file mode 100644
index 000000000..bc1784cf2
--- /dev/null
+++ b/377/CH15/EX15.5/15_5.sce
@@ -0,0 +1,6 @@
+disp("λ=c*h/Eg");

+h=6.626*10^-34;

+c=2.998*10^8;

+E=1.43*1.6*10^-19;

+d=c*h/E;

+printf('\nThe value of λ is %fμm',d*10^6);
\ No newline at end of file
diff --git a/377/CH15/EX15.6/15_6.sce b/377/CH15/EX15.6/15_6.sce
new file mode 100644
index 000000000..8508db84e
--- /dev/null
+++ b/377/CH15/EX15.6/15_6.sce
@@ -0,0 +1,13 @@
+disp("Pout=I*V");

+I=14*10^-3;

+V=0.425;

+Pout=I*V;

+printf('\n The value of Pout is %fW',Pout);

+disp("Pin=li*A");

+li=50*10^-1;//say li=light intensity

+A=0.01;//say A=surface area

+Pin=li*A;

+printf('\n The value of Pin is %fW\n',Pin);

+disp("η=(Pout/Pin)*100");

+n=(Pout/Pin)*100;

+printf('\n The photo voltaic efficiency is %fpercent',n);
\ No newline at end of file
diff --git a/377/CH15/EX15.7/15_7.sce b/377/CH15/EX15.7/15_7.sce
new file mode 100644
index 000000000..6f19ac501
--- /dev/null
+++ b/377/CH15/EX15.7/15_7.sce
@@ -0,0 +1,3 @@
+disp("It/(2*It)=exp((27/100)-(T/110))");

+T=110*(log(2)+(27/100));

+printf('\n The value of T is %fCentigrade',T);
\ No newline at end of file
diff --git a/377/CH15/EX15.8/15_8.sce b/377/CH15/EX15.8/15_8.sce
new file mode 100644
index 000000000..63e05ce91
--- /dev/null
+++ b/377/CH15/EX15.8/15_8.sce
@@ -0,0 +1,10 @@
+disp("Voc=k*log(Il/Is)");

+k=0.026;//say k=K*T/q

+Il=100*10^-3;

+Is=1*10^-9;

+Voc=k*log(Il/Is);

+printf('\n The value of Voc is %1.2fV',Voc);

+disp("P=(Il*V)-(Is*exp((V/k)-1))");

+V=0.35;

+P=(Il*V)-(Is*exp((V/k)-1));

+printf('\n The Output power is %f*10^-4W',P*10^4);
\ No newline at end of file
diff --git a/377/CH15/EX15.9/15_9.sce b/377/CH15/EX15.9/15_9.sce
new file mode 100644
index 000000000..a080c38f5
--- /dev/null
+++ b/377/CH15/EX15.9/15_9.sce
@@ -0,0 +1,7 @@
+disp("Emax=q*Na*d/Єs");

+q=1.6*10^-19;

+Na=6.42*10^18;

+d=50*10^-8;

+es=12.9*8.854*10^-14;//say es=Єs

+Emax=q*Na*d/es;

+printf('\n The value of Emax is %fkV/cm',Emax*10^-3);
\ No newline at end of file