6 lines
83 B
Text
6 lines
83 B
Text
|
INTEGER FUNCTION MULTIPLY( A, B );
|
||
|
|
INTEGER A, B;
|
||
|
|
BEGIN
|
||
|
|
MULTIPLY := A * B;
|
||
|
|
END;
|