Как посчитать количество прописных букв в строке, visual basic(код)

linagalkinaa1 linagalkinaa1    2   27.04.2019 16:37    3

Ответы
BrainNotBrain BrainNotBrain  09.06.2020 00:21

Объяснение:

Module Module1

   Sub Main()

       Dim stroka As String = "Test STRING" '7 прописных символов

       Dim i, count As Byte

       count = 0

       For i = 1 To Len(stroka)

           If (Mid(stroka, i) >= "A" And Mid(stroka, i) <= "Z") Then

               count = count + 1

           End If

       Next i

       Console.WriteLine("Количество прописных букв= {0}", count)

       Console.ReadLine()

   End Sub

End Module

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика