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