При работе с файловой системой используются следующие договоренности:
s àdisk:\kat\kat\...\file – поиск объекта file осуществляется с корневого каталога; s àdisk:kat\kat\...\file – поиск с текущей директории указанного диска.
GetDir(d:byte;var s:string); (d=0 – текущий дисковод, 1 – a:, 2 – b: и т.д.), s – текущий каталог.
ChDir,MkDir,RmDir(s:string) – изменение, создание, удаление пустого
Rename(f; newname:string) – переименование файла;
Задача: Написать процедуру удаления любого каталога (даже непустого).
