6 lines
143 B
Text
6 lines
143 B
Text
package body Functions is
|
|
function Multiply (A, B : Integer) return Integer is
|
|
begin
|
|
return A * B;
|
|
end Multiply;
|
|
end Functions;
|