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

5 lines
84 B
Plaintext

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