Составить программу общего сопротивления при параллельном соединении, когда R1=3, R2=6,...

Question

Составить программу общего сопротивления при параллельном соединении, когда R1=3, R2=6, R3=12?

Answer 1

Var r, r1,r2,r3:real;

begin
r1:=3; 
r2:=6; 
r3:=12;
r:=(r1*r2*r3)/(r1*r2+r2*r3+r1*r3);
print(r);
end.