Ну описывать особо нечего, кто знает, что такое
`сетевой график' итак поймет. Формат входной информации
описан в in.data. На выходе получается карточка определитель,
и собственно сам расчет критического пути.

При расчете критический путь показан как '===='


Для генерации только расчета критического пути можно
пользовать net_graph-MAIN.pl формат входной информации
для него:

	Событие 	Продолжительность ( дн )
	1-2			12

Запускать примерно так:

	perl net_graph.pl in_data_file > out_file