format short e;

%Tutaj wprowadz warości kondensatora C2:
C2=[ 0.1*10^-6 0.2*10^-6 0.3*10^-6 0.4*10^-6 0.5*10^-6]

%Wartości poszczególnych elementów, narzucone przez instrukcje, ew
%edytowalne
R1=10*10^3;
R2=10*10^3;
r=10*10^3;
C1=0.1*10^-6;

%Obliczenia
T1=R1*C1;
T2=C2;
C3=C2;
k=C2;
T0=C2;
for i = 1:length(C2)
     T2(1,i) = R2*C2(1,i);
     C3(1,i)=R1*R2*T1*T2(1,i)/(r^3*(T1+T2(1,i)));
     k(1,i)=R1*R2/(r^3*C3(1,i));
     i=i+1;
     
end
T2
C3
k
T0=sqrt((C2(1,1)*C3(1,1)*r^3)/R1);
     T0=sqrt((C2(1,2)*C3(1,2)*r^3)/R1);
     T02=sqrt((C2(1,2)*C3(1,2)*r^3)/R1);
scatter(C2,k,'DisplayName','T2 vs k','XDataSource','T2','YDataSource','k');figure(gcf)