Program Begin11;
Var
a,b:Real;
Begin
ReadLn(a,b);
WriteLn('Add: ',Abs(a) + Abs(b));{Сумма}
WriteLn('Sub: ',Abs(a) - Abs(b));{Разность}
WriteLn('Mul: ',Abs(a) * Abs(b));{Произведение}
WriteLn('Div: ',Abs(a) / Abs(b));{Частное}
ReadLn;
End.