---

&НаКлиенте
Процедура Округлить(Команда)

КонецПроцедуры

&НаКлиентеНаСервереБезКонтекста
Функция ОкруглитьДо95(Число)

КонецФункции

&НаКлиентеНаСервереБезКонтекста
Функция ЦелЧисло(Строка)

КонецФункции

&НаКлиенте
Процедура ФИО(Команда)

КонецПроцедуры

&НаКлиентеНаСервереБезКонтекста
Функция ПерваяЗаглав(Слово)
    Возврат ВРег(Лев(Слово, 1)) + НРег(Сред(Слово, 2));
КонецФункции

&НаКлиенте
Процедура Счет(Команда)

    Строка = ИсходнаяСтрока;
    Поз = Найти(Строка, "+");

    Если Поз = 0 Тогда
        ПоказатьПредупреждение(, "нет");
        Возврат;
    КонецЕсли;

    Часть1 = СокрЛП(Лев(Строка, Поз - 1));
    Часть2 = СокрЛП(Сред(Строка, Поз + 1));

    Попытка
        ИсходноеЧисло = Число(Часть1);
        РезультатЧислом = Число(Часть2);
    Исключение
        ПоказатьПредупреждение(, "не хочу");
        Возврат;
    КонецПопытки;

    Сумма = ИсходноеЧисло + РезультатЧислом;
    РезультатСтрокой = Строка(ИсходноеЧисло) + "+"
        + Строка(РезультатЧислом) + "=" + Строка(Сумма);

    //Плюс = СтрНайти(ИсходнаяСтрока, "+");
    //ЧислоСТР1 = СокрЛП(Сред(ИсходнаяСтрока, 1, Плюс - 1));
    //ЧислоСТР2 = СокрЛП(Сред(ИсходнаяСтрока, Плюс + 1));
    //Число1 = Число(ЧислоСТР1);
    //Число3 = Число(Сред(ЧислоСТР2, 1, 1));
    //Итог = Число1 + Число3;
    //РезультатСтрокой = Строка(Число1) + "+" + Строка(Число3)
    //    + "=" + Строка(Итог);

КонецПроцедуры

&НаКлиенте
Процедура Инициализация(Команда)

    ИмяСлово = "";
    ОтчествоСлово = "";

    Строка = СокрЛП(ИсходнаяСтрока);

    Поз = СтрНайти(Строка, " ");
    Если Поз > 0 Тогда
        ИмяСлово = Лев(Строка, Поз - 1);
        Строка = СокрЛП(Сред(Строка, Поз));
    КонецЕсли;

    Поз = СтрНайти(Строка, " ");
    Если Поз > 0 Тогда
        // Продолжение на фотографии не видно полностью.
    КонецЕсли;

КонецПроцедуры