INTEGER FUNCTION MULTIPLY( A, B ); INTEGER A, B; BEGIN MULTIPLY := A * B; END;