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

5 lines
84 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
PROCEDURE Multiply(a, b: INTEGER): INTEGER;
BEGIN
RETURN a * b;
END Multiply;