
Найти общее сопротивление соединения,если 3 проводника соединены параллельно,и их сопротивления вводит пользователь.
(Var R1, R2, R3, R: REAL;

// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
var r1,r2,r3:real;
Write(Введите R1 R2 R3: ); Read(r1,r2,r3);
var g:=1/r1+1/r2+1/r3;
Writeln(R=,1/g:0:5)
end.
Тестовое решение:
Введите R1 R2 R3: 3.5 2.75 4
R=1.11191
Оцени ответ