ответьте на вопросы : 1)какие вы знаете типы дисков внешней памяти? 2)что понимается под процессом форматирования диска? 3)на какие элементы разбивается диск при форматировании? 4)что является наименьшей единицей хранения данных на жёстком диске? 5)назовите причину возникновения фрагментирования файлов? 6)дайте определение файловой системы? 7)что принято понимать под файлом? 8)перечислите характеристики файлов. 9)назовите виды атрибутов файла. 10)какие вы знаете маски имени файлов? 11)из каких частей состоит системная область диска? 12)что может располагаться в корневом каталоге?

1) hdd и ssd - диск с магнитными дисками и твердотельный диск
2) приведение к стандартному виду ячеек памяти диска
3) на 2 области: Область хранения файлов (содержимое книги) Каталог (оглавление книги) содержит имя файла и указание на номер начального сектора на диске, объем файла, дату и время его создания. 
4) бит
5) потому что когда файл пишется на диск - он может писаться в разных его концах. из-за этого для его считывания уходит много времени для перемещения головок
6) порядок, определяющий организации, хранения и именования данных на носителях информации в компьютерах, а также в другом электронном оборудовании
7) под файлом принято понимать ограниченный объём информации, существующей физически в ЭВМ, системе ЭВМ или сетях ЭВМ
8) дата создания, имя, размер 
9)
- имя файла и тип содержимого;
- дата и время создания файла;
- имя владельца файла;
- размер файла;
- права доступа к файлу;
- метод доступа к файлу.
10) 
Символ * - заменят любое количество символов
Символ ? - заменяет ровно один символ
11) 
Загрузочный сектор (Boot Record) 
Таблица размещения файлов(File Allocation Table — сокращенно FAT)
Корневой каталог (Root Directory) 
12) все что угодно

Program Premier_liga_2;

var B, Diff: array [1..16] of integer;

   Team: array[1..16] of string;

   I, K, X, Z, P: integer;

   St: string;

begin

 writeln('Введите названия команд и полученные ими очки');

 for I:=1 to 16 do

 begin

   write(I, ' Название: '); readln(Team[I]);

   write('Очки: '); readln(B[I]);

   write('Забитые мячи: '); readln(Z);

   write('Пропущенные мячи: '); readln(P);

   Diff[I]:= Z-P;

 end;

 for K:=1 to 15 do

 for I:=1 to 16-K do

   if (B[i] < B[I+1]) or  

      ((B[i] = B[I+1]) and (Diff[i] < Diff[I+1])) then

   begin

       X:=B[I]; B[I]:=B[I+1]; B[I+1]:=X;

       St:=Team[I]; Team[I]:=Team[I+1];

       Team[I+1]:=St;

   end;

 for I:=1 to 16 do

 begin

   for K:=1 to 18-length(Team[I]) do

     Team[I]:=Team[I]+' ';

   writeln(I:2,' ',Team[I]:18,B[I]:2)

 end;

end.

Program Premier_liga_2;

var B, Diff: array [1..16] of integer;

   Team: array[1..16] of string;

   I, K, X, Z, P: integer;

   St: string;

begin

 writeln('Введите названия команд и полученные ими очки');

 for I:=1 to 16 do

 begin

   write(I, ' Название: '); readln(Team[I]);

   write('Очки: '); readln(B[I]);

   write('Забитые мячи: '); readln(Z);

   write('Пропущенные мячи: '); readln(P);

   Diff[I]:= Z-P;

 end;

 for K:=1 to 15 do

 for I:=1 to 16-K do

   if (B[i] < B[I+1]) or  

      ((B[i] = B[I+1]) and (Diff[i] < Diff[I+1])) then

   begin

       X:=B[I]; B[I]:=B[I+1]; B[I+1]:=X;

       St:=Team[I]; Team[I]:=Team[I+1];

       Team[I+1]:=St;

   end;

 for I:=1 to 16 do

 begin

   for K:=1 to 18-length(Team[I]) do

     Team[I]:=Team[I]+' ';

   writeln(I:2,' ',Team[I]:18,B[I]:2)

 end;

end.