Написать программу для Паскаля. 3 сопротивления R1,R2,R3 соединены параллельно.Найти общее сопротивление соденинения.Написать(наподобие Program *что-то* и дальше var...и т.д)
Написать программу для Паскаля.
3 сопротивления R1,R2,R3 соединены параллельно.Найти общее сопротивление соденинения.
Написать(наподобие Program *что-то* и дальше var...и т.д)
Гость
Ответ(ы) на вопрос:
Гостьprogram resistance;
var r1, r2, r3: real;
begin
readln(r1, r2, r3);
r1 := 1/r1 + 1/r2 + 1/r3;
r1 := 1/r1;
writeln(r1)
end.
Не нашли ответ?
Похожие вопросы