Сравните числа: а) 11112 11118 б) 101012 101112 в) А9916 99916 г) 110102 и 328

а) 11112 меньше, чем 11118

б) 101012 меньше, чем 101112

в) 9916 меньше, чем 99916

г) 110102 больше, чем 328

а) 11112 < 11118

б) 101012 < 101112

в) 99916 = 99916

г) 110102 > 328

А в чем сложность то? :)

а) свойства

б) Это окно, позволяющее пользователю заблокировать систему, сменить пользователя, выйти из системы, сменить пароль, вызвать Диспетчер задач Windows, завершить сеанс завершением работы, перезагрузкой или переводом компьютера в ждущий режим или в гибернацию.

в) -

г) Открывает окно поиска в браузере или навигацию в Microsoft Word. ... Делает активной адресную строку в браузере или выравнивание по левому краю текста в текстовых редакторах. Ctrl + M. Отступ выделенного текста в текстовых редакторах и во многих других программах.

Function ds(ByVal n As Integer) As Integer
    'Сумма цифр в числе n
    Dim s As Integer
    s = 0
    Do While n <> 0
        s = s + n Mod 10
        n = Int(n / 10)
    Loop
    ds = s
End Function

Function IsGood(n As Integer) As Boolean
    'Сохраняется ли сумма цифр при умножении числа на 2,3,..9 ?
    Dim etalon As Integer, k As Integer
    etalon = ds(n)
    IsGood = True
    k = 2
    Do While IsGood And k < 10
        IsGood = (ds(n * k) = etalon)
        k = k + 1
    Loop
End Function

Sub aaa()
    Dim i As Integer, s As String
    s = ""
    For i = 10 To 99
        If IsGood(i) Then s = s + Str(i)
    Next i
    MsgBox s
End Sub

Тестовое решение:
18 45 90 99