Система из двух последовательных сопротивлений r1 и r2 соединена параллельно с сопротивлением r3. к цепи приложено напряжение v. найти силу тока в каждом из сопротивлений. (в паскале)
Var r1,r2,r3,U:real; begin Write('Введите величины сопротивлений R1, R2, R3: '); Read(r1,r2,r3); Write('Введите величину напряжения V: '); Read(U); Writeln('Ток через R1 и R2 равен ',U/(r1+r2)); Writeln('Ток через R3 равен ',U/r3) end.
Пример Введите величины сопротивлений R1, R2, R3: 130 70 215 Введите величину напряжения V: 220 Ток через R1 и R2 равен 1.1 Ток через R3 равен 1.02325581395349
r1,r2,r3,U:real;
begin
Write('Введите величины сопротивлений R1, R2, R3: ');
Read(r1,r2,r3);
Write('Введите величину напряжения V: ');
Read(U);
Writeln('Ток через R1 и R2 равен ',U/(r1+r2));
Writeln('Ток через R3 равен ',U/r3)
end.
Пример
Введите величины сопротивлений R1, R2, R3: 130 70 215
Введите величину напряжения V: 220
Ток через R1 и R2 равен 1.1
Ток через R3 равен 1.02325581395349