Олимпиадные задачи по программированию. Лучшие решения. Часть 1. Ускова О.Ф - 59 стр.

UptoLike

For I:=1 to N do
If M[I,I] then M[I,I]:=False;
End;
End;
Procedure Done;
{Вывод результатов}
Var F:Text;
Begin
Assign(F,'output.txt');ReWrite(F);
WriteLn(F,FC);
Close(F);
End;
Begin
Init;
Run;
Done
End.
Задача 5. «Трубопровод»
В основу условия задачи положена задача, которая
предлагалась на четверть финале мирового первенства по
программированию 2000 года (г.Саратов). Автор программы
член сборной ВГУ по программированию , в настоящее время
студент 5 курса факультета ПММ ВГУ Андрей Евгеньевич
Поляков.
1. Условие задачи .