Program Example41; { Program to demonstrate the GetEnv function. } Uses linux; begin Writeln ('Path is : ',Getenv('PATH')); end.