Написать программу в паскале Три сопротивления R1, R2 и R3соединены параллельно. Найти сопротивление соединения R0.
Написать программу в паскале
Три сопротивления R1, R2 и R3соединены параллельно. Найти сопротивление соединения R0.
Гость
Ответ(ы) на вопрос:
ГостьProgram begin_20;
var r1,r2,r3,r0:real;
begin writeln('введите сопротивление R1');
readln(r1);
writeln('введите сопротивление R2');
readln(r2);
writeln('введите сопротивление R3');
readln(r3);
r0:=1/(1/r1+1/r2+1/r3);
writeln('общее сопротивление R0',r0:4:4);
Readln;
End.
Не нашли ответ?
Похожие вопросы