Ответ:
//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
uses System.Linq;
begin
writeln('III');
var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;
writeln;
while a.Any() do
begin
write(a[0], ' ');
a.RemoveAt(0);
if not a.Any then break;
write(a.Last, ' ');
a.RemoveAt(a.Count - 1);
if not a.Any then break;
var n := 0;
if a.Count > 1 then n := a.Count div 2 - 1;
write(a[n], ' ');
a.RemoveAt(n);
end;
end.
Объяснение:
Деловая бумага
подтверждает факт или письмо
на нём есть печать
он завершён подписью
Не носится по кабинету, а то снесешь комп и заставят платить)
Ответ:
Граф под номером 2
Объяснение:
Из пункта В есть 4 пути.
Рассмотрим графы по очереди:
1) на первом графе из пункта В 4 пути, он может нам подойти;
2) на втором графе из пункта В 4 пути, он может нам подойти;
3) на третьем графе из пункта В 3 пути, он не может нам подойти;
4) на четвертом графе из пункта В 3 пути, он не может нам подойти.
В дальнейшем будем рассматривать только 1 и 2 графы, так как 3 и 4 нам уже не подходят.
Из пункта Е есть 3 пути.
Рассмотрим графы по очереди:
1) на первом графе из пункта Е 2 пути, он не может нам подойти;
2) на втором графе из пункта Е 3 пути, он может нам подойти.
В дальнейшем будем рассматривать только 2 граф, так как 1, 3 и 4 нам уже не подходят.
Проверим соответствуют ли расстояния между пунктами указанным в таблице. Расстояния соответствуют.
