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