Информатика, опубликовано 2018-08-22 20:10:31 by Гость

Составте пожалуйста программу на языке basic для определения имеется ли в данном слове часть, равная заданному слову

Ответ оставил Гость

Sub Z()
Dim t, s As String
t = InputBox("Введите строку:")
s = InputBox("Введите словоî:")
If InStr(t, s) > 0 Then
MsgBox ("Да, это слово есть в строке")
Else: MsgBox ("Нет такого слова в строке")
End If
End Sub

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.