function Multiply(a, b: Integer): Integer;
begin
  Result := a * b;
end;