Для кода на языке VB, представленного в листинге 1, рассчитайте метрики Холстеда и заполните таблицу 1.