Автор не ответил на мой вопрос :( Пробуем телепатировать :)
МногоСтрочнаяСтрока = СтрЗаменить(ИсходнаяСтрока, " ", Символы.ПС);
Для К = 1 По СтрЧислоСтрок(МногоСтрочнаяСтрока) Цикл
Слово = СтрПолучитьСтроку(МногоСтрочнаяСтрока, К);
...
Можно обобщить - заменить все последовательности символов (последовательность - когда подряд), которые автор считает разделителями, на ПС, далее по тексту.
Т.е цикл с заменой разделителей на ПС, затем меняем сдвоенные ПС на одинарные до тех пор, пока остаются сдвоенные.
(0) ты программист, или кто? гнал бы ссаным веником таких специалистов.
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший