249 оператор Составной оператор в Паскале Производственный календарь на 25 год армения