unit nt.nst; interface Procedure HelloThere; implementation Procedure HelloThere; begin Writeln('Hello, there'); end; end.