Определите значение сигнала на выходе логической схемы.

14                                                                                                                       

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.

t1 = s1/v1

t2 = s2/v2

v(sr) = (s1+s2)/(t1+t2)

конечно .pas! простой вопрос!