По закону Ома для участка цепи
<u>PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018</u><u>Внимание! Если программа не работает, обновите версию!</u>begin
var U:=ReadReal('U=');
var (r1,r2):=ReadReal2('R1,R2=');
Writeln('I=',U/(r1+r2))
end.
<u>Пример</u>U= 12
R1,R2= 10 6.5
I=0.727272727272727
<span>да мы можем увидеть какие есть деревья ,животные и научиться различать их))</span>