Файл данных:
Первое — это архивный шифр. Он состоит из названия фонда, номера фонда, номера описи, номера единицы хранения (дела), номера листа в деле. Пусть будет: ГА. Ф. 111. Оп. 5. Д. 469. Л. 342, 347-347 об., 374 (Государственный архив. Фонд 111. Опись 5. Дело 469. Листы 342, 347-347 оборот, 374)
Название фильма: Бегущий в лабиринте: Лекарство от смерти
Режиссер: УэсБолл
Год выпуска: 2018
Страна: США
Актеры: Кая Скоделарио, Дилан О'Брайэн, Натали Эммануэль, Кэнтрин МакНамара, Томас Сэнгстер, Уолтон Гоггинс, Роза Салазар, Джанкарло Эспозито, Патриция Кларксон, Бэрри Пеппер, Ки Хонг Ли, Джейкоб Лофленд и другие.
Носитель: CD
Отдано: 1
_______________________
Файл друзей:
Фамилия: Колер, Сун
Имя: Скот, Девин
Телефон: +1 650 759-97-50 (США)
Дата выдачи: 1.02.2018 (дата выхода фильма)
Дата возвращения: 11.03.2018
Б) 209, 9, 104, 37
В не знаю
var k,i,j:integer;
a:array[1..5]of integer;
begin
for i:=1 to 5 do begin
for j:=1 to 4 do begin
if a[j]>a[j+1] then begin
k:=a[j+1];
a[j+1]:=a[j];
a[j]:=k;
end;
end;
end;
end.