Рис.2.

Блок-схема работы подпрограммы mainwork