Программа:
Pascal:
var
a, b, c, m: real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
m := (2 *max(a, b) + min(a + 3, b)) / (min(c, a - b));
writeln('m = ', m);
end.
