Написать программу, которая находит самое короткое слово в предложении - VB
Формулировка задачи:
Задано предложение, состоящее из слов-строк. Написать программу, которая находит самое короткое слово в предложении.
Решение задачи: «Написать программу, которая находит самое короткое слово в предложении»
textual
Листинг программы
- Option Explicit
- Private Sub Form_Load()
- Dim v, s$, i&
- s = "Написать программу которая находит самое короткое слово в предложении"
- For i = 1 To Len(s)
- For Each v In Split(s)
- If Len(v) = i Then GoTo m
- Next
- Next
- m: MsgBox "Самое короткое слово: " & v
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
