Известно сопротивление каждого из элементов электрической цепи. Все элементы соединены параллельно. Определить общее сопротивление элементов. pascal pozhaluista srochno!!!

Question

Известно сопротивление каждого из элементов электрической цепи. Все элементы соединены параллельно. Определить общее сопротивление элементов. pascal pozhaluista srochno!!!

Гость

Ответ(ы) на вопрос:

Accepted Answer

var cond,res:real; begin cond:=0; readln(res); while (res>0) do begin cond:=cond + 1/res; readln(res); end; writeln(1/cond) end. (Считаю, что с клавиатуры вводятся сопротивления, признак конца ввода - 0)