Определить, каких букв в тексте больше - заглавных или строчных - VB
Формулировка задачи:
Дан текст – непустая последовательность не длиннее ста символов. Преобразованный текст вывести на экран.
В ТЕКСТЕ ЗАГЛАВНЫХ БУКВ БОЛЬШЕ ЧЕМ СТРОЧНЫХ.напишите пожалуйста,как это сделать
Решение задачи: «Определить, каких букв в тексте больше - заглавных или строчных»
textual
Листинг программы
For i = 1 To Len(s) d = Mid$(s, i, 1) If d Like "[A-ZА-ЯЁ]" Then z=z +1 'Подсчёт заглавных , а в ответе так ... длина всего текста - z End If