JordanCarter

Program JordanCarter;

Var a, b: Real;

Begin

Write('a:= ');

Readln(a);

Write('b:= ');

Readln(b);

Writeln('Ответ:= ',4*a-2*(a+2*b));

End.