Сколько существует двухбуквенных слов? - VB
Формулировка задачи:
Здравствуйте, сколько их?, есть мнение что 561
как программно их вывести например в текстовый файл?
повторятся буквы могут, задействовать нужно все 33 буквы
Решение задачи: «Сколько существует двухбуквенных слов?»
textual
Листинг программы
- Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
- Sub Form_Paint()
- '97 - a, z - 122, английский алфавит: 'abcdefghijklmnopqrstuvwxyz'
- For q = 97 To 122
- keybd_event q, 0, 0, 0
- Next q
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
