Program TuKpa6; var a,b,c:real; BEGIN writeln('BBeguTe a'); readln(a); writeln('BBeguTe b'); readln(b); writeln('BBeguTe c'); readln(c); writeln(((a-b)/c)/((a+b)/2)); END.