【VB代码】求两个并联电阻的总阻值

问题描述:

【VB代码】求两个并联电阻的总阻值
Dim R1 As Double,R2 As Double
_______________________
_______________________
_______________________
_______________________

r1=inputbox("输入第1个电阻值")
r2=inputbox("输入第2个电阻值")
print (r1*r2)/(r2+r2)