// Determine the value of the circuit components

clc;
clear;

Z=10-(30*%i);

f=1*(10^6);

Y=1/Z;

G=real(Y);
B=imag(Y);

// G= 1/R
// B= wC


w=2*%pi*f;

R=1/G;

C=B/(w);

cap=abs((10^9)*C)/(10^9);

disp('ohms',R,'The resistance of the circuit =')
disp('nF',cap,'The capacitance of the circuit =')