Как узнать регистр букв?
УзнатьРегистрБуквы(Буква);
Прописная, или заглавная буква

кодсимвола

если стрМояСтрока = ВРЕГ(стрМояСтрока) тогда
  сообщить("верхний регистр")

Буква = ВРЕГ(Буква)

Если (Символ = ВРЕГ(СИМВОЛ)) И (НЕ(Символ = нрег(СИМВОЛ))) Тогда
    // прописная

(2) (3) "/" = ВРЕГ("/")

(5) и шо? ВРЕГ("/") = НРЕГ("/")

(6) см (4)

(7) тогда уж в (4) //заглавная
"/" - какой регистр?

(4) Спасибо!

Получилось так:
Функция УзнатьРегистрСимвола(Символ)
    Если (НЕ ( Символ = Врег(СИМВОЛ) ) ) И ( Символ = Нрег(СИМВОЛ) ) Тогда
        Возврат 1;
    Иначе
        Возврат -1;
    КонецЕсли;
КонецФункции    // УзнатьРегистрБуквы

Функция УзнатьРегистрПредложения(Разобрать)
    Слово = СокрЛП(Разобрать);
    Сумма = 0;
    Для н=1 По СтрДлина(Слово) Цикл
        Буква = Сред(Слово,н,1);        
        Сумма=Сумма+УзнатьРегистрСимвола(Буква);
    КонецЦикла;        
    Если -Сумма = СтрДлина(Слово) Тогда
        Возврат 1;
    Иначе
        Возврат 0;
    КонецЕсли;    
КонецФункции    // УзнатьРегистрПредложения

Процедура Сформировать()
    
    Сообщить(УзнатьРегистрПредложения(Предл));
    
КонецПроцедуры

(8) для саморазвития почитай чем отличаются заглавная, прописная и строчная буквы :)

в (9) чет странное написано, не? =)

Ветку не читал. Про ВРЕГ было уже?