Вызов функции из неуправляемой dll

library NativeDll;
 
function add(a,b: integer): integer; stdcall;
begin
  Result := a+b;
end;
 
exports
  add;
begin
end.

function add(a,b: integer): integer; external 'NativeDll.dll' name 'add'; // объявление внешней функции
 
begin // основная программа
  writeln(add(2,3));
end.