RosettaCodeData/Task/Function-definition/Modula-2/function-definition.mod2

PROCEDURE Multiply(a, b: INTEGER): INTEGER;
BEGIN
  RETURN a * b
END Multiply;