4 lines
81 B
Text
4 lines
81 B
Text
PROCEDURE Multiply(a, b: INTEGER): INTEGER =
|
|
BEGIN
|
|
RETURN a * b;
|
|
END Multiply;
|