RosettaCodeData/Task/Function-definition/Delphi/function-definition.pas

function multiply(a, b: integer): integer;
begin
  result := a * b;
end;