Pascal/Turbo Pascal - directorio

como puedo crear un directorio en pascal?

Se utiliza el procedimiento CreateDir() de la UNIT WinDOS.
Este es el ejemplo de la ayuda:

{CreateDr.PAS}
{Sample code for the CreateDir procedure.}
uses Crt, WinDOS;
const
Create: PChar = 'C:\NEWDIR';
CDrive: Byte = 3;
begin
CreateDir(Create);
Writeln('There is now a new directory at ', Create,'.');
ReadKey
end.

Suerte.