Dim Z As Integer, X As Integer, Y As Integer

Запустите приложение и нажмите кнопку ПУСК. В приложении будет напечатана следующая строка:

Объясните, почему вы видите такой результат.

10. Замените

Строку Dim Z As Integer, X As Integer, Y As Integer

Строкой Dim Z As Integer, X As Integer, Y As Double

Запустите приложение и нажмите кнопку ПУСК. В приложении будет напечатана следующая строка:

Объясните, почему вы видите такой результат.

11. Полностью замените текст программного кода процедуры, которая выполняется при нажатии кнопки ПУСК, на следующий:

DefInt A-F, K, M

Const G As Variant = 40000

Const H As Variant = 42000

Private Sub cmdПуск _Click()

K = H + G

K=K*2

F = H - G

F=F - 10000

M = ″OK!″

Print K, F, M