$\%$ Given values

R$1=4$e$3$; $\%$ Resistance in ohms

C$1=2\mathrm{.}5$e$-12$; $\%$ Capacitance in farads

$\%1.$ Filter Type

disp$(\text{'}$The circuit is a Highpass filter.$\text{'})$;

$\%2.$ Cutoff Angular Frequency

omega$\_$c $=1/($R$1*$ C$1)$;

fprintf$(\text{'}$The cutoff angular frequency is $\%\mathrm{.}2$e rad$/$s

$\text{'},$ omega$\_$c$)$;

$\%3.$ Magnitude of Transfer Function at specified omega values

omega$\_$values $=[3\mathrm{.}0$e$7,5\mathrm{.}0$e$7,1\mathrm{.}0$e$8,1\mathrm{.}5$e$8,2\mathrm{.}5$e$8]$; $\%$ Given omega values

M$\_$values $=$ zeros$($size$($omega$\_$values$))$; $\%$ Preallocate array for magnitudes

for i $=1$:length$($omega$\_$values$)$

omega $=$ omega$\_$values$($i$)$;

H $=(1$i $*$ omega $*$ R$1)/(1+1$i $*$ omega $*$ R$1*$ C$1)$; $\%$ Transfer function

M$\_$values$($i$)=$ abs$($H$)$; $\%$ Magnitude of the transfer function

end

$\%$ Display the results

disp$(\text{'}$Magnitude of the Transfer Function at Given Omega Values:$\text{'})$;

for i $=1$:length$($omega$\_$values$)$

fprintf$(\text{'}$Omega $=\%\mathrm{.}2$e rad$/$s$,$ M $=\%\mathrm{.}4$f

$\text{'},$ omega$\_$values$($i$),$ M$\_$values$($i$))$;

end