Как умножить два числа - VB
Формулировка задачи:
На форме находятся кнопка и текстовое поле.
Вы вводите в текстовое поле следующий текст
"88 умножить 77". Программа выдаст вам результат
при любых целых числах. Ну а если вместо слова
"умножить" вы поставите "плюс", то программа
сложит заданные числа.
А что тут такого особенного? - спросит читатель.
Ничего. Если не считать, что нечто подобное я собираюсь
поместить в файл для создаваемой мною разговорной
программы с искусственным интеллектом. Отныне эта
программа будет уметь оперировать с числами, например
сравнивать их.
примечание
Конечно в реальной программе вопрос будет звучать примерно
так "сколько будет если 77 умножить на 88" (но это мелочи)
Всё познаётся в сравнении... или нет?
Решение задачи: «Как умножить два числа»
textual
Листинг программы
Dim aTemp() As String Dim s As String aTemp = Split(Trim(txtT.Text), " ") s = LCase(aTemp(1)) Select Case s Case "умножить" Print aTemp(0) * Ubound(aTemp) Case "плюс" Print aTemp(0) + Ubound(aTemp) Case Else Print "Моя твоя не понимать" End Select
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д