Дипломная работа: Рассчитать основные размеры бражной колонны

3,837

14,20

3,843

14,20

3,848

14,20

3,852

0,073

14,20

3,858

14,20

3,864

14,20

3,869

14,20

3,875

4 Текст программы в VBA

Private Sub CommandButton1_Click()

Dim VPAR, VPR, VP3, VD, VD1, VP1, VP2, VPA, D, S, L, G, X, VIS As Single

Dim P As Integer

VPAR = Cells(2, 1)

VPR = Cells(2, 2)

VP3 = Cells(2, 3)

VD = Cells(2, 4)

VD1 = Cells(2, 5)

VP1 = Cells(2, 6)

VP2 = Cells(2, 7)

VPA = Cells(2, 8)

L = 1