profile
Опубликовано 6 лет назад по предмету Информатика от dfghjk111

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

  1. Ответ
    Ответ дан nelle987

    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)

Самые новые вопросы