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