RosettaCodeData/Task/Function-definition/Oberon-2/function-definition.oberon-2

5 lines
84 B
Plaintext

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