// Exa Misc. 6.19
clc;
clear;
close;
format('v',6)
// Given data
R1 = 1;// in Mohm
// The input impedance 
Rin = R1;// in Mohm
disp(Rin,"The input impedance in Mohm is");
R2 = 1;// in Mohm
// The voltage gain 
Avf = -R2/R1;// Voltage gain
disp(Avf,"The voltage gain is");