Определить, можно ли из символов заданной строки составить вашу фамилию - VB (61938)
Формулировка задачи:
Есть две строки : "a" - куча рандомных букв, "b"- фамилия
Я брал один первый символ своей фамилии (строка "b" ) и искал её первое вхождение в строку
"a"
. Если есть такое вхождение , удалял этот символ из строки"a"
( Для того чтобы обойти повторные символы )
и добавлял к счетчику n=n+1 (n - получается количество наших совпадений) . В конце , если количесво совпадений"n"
равняется количеству букв нашей фамилии, то можно составить. Вот код мой :
На первый взгляд все работало отлично, пока я не поменял буквы местами
В итоге я нашел ошибку, что функция " a = a.Remove(j, 1) " не удаляет наше совпадение, а удаляет что-то другое.
Так вот собственно нужна помощь:
Что прописать нужно вместо
"j"
, чтобы она удалила именно совпадение ?Решение задачи: «Определить, можно ли из символов заданной строки составить вашу фамилию»
textual
Листинг программы
For i = 1 To Len(b) t = Mid(b, i, 1) 'IF INSTR(a, t) <> 0 THEN n = n + 1 : a = a.Remove(j, 1) If InStr(a, t) <> 0 Then n = n + 1: Mid(a, InStr(a, t), 1) = " " Next i
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д