6- c
8-c
9-b
10-a
В 10 не уверен.
Зависит от того как разбивать. если разбивать на /32 (такое возможно), то 64 сети.
если на /31 (тоже бывает), то 32 сети
/30 - 16
/29 - 8
/28 -4
/27 -2
возможны и промежуточные варианты, например 2 сети /30, 1 сеть /29 и 3 сети /28
200.15.60.0/30
200.15.60.4/30
200.15.60.8/29
200.15.60.16/28
200.15.60.32/28
200.15.60.48/28
или 2 сети /30, 1 сеть /29 , 1 сеть /28 и 1 сеть /27
200.15.60.0/30
200.15.60.4/30
200.15.60.8/29
200.15.60.16/28
200.15.60.32/27
Sub aaa()
a = CDbl(InputBox("первое число"))
b = CDbl(InputBox("второе число"))
MsgBox "минимум двух чисел " + CStr(IIf(a > b, b, a))
End Sub