RosettaCodeData/Task/Function-definition/Modula-3/function-definition.mod3

5 lines
81 B
Plaintext

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