---

// 1. Ввод строки
Строка = "";
ВвестиСтроку(Строка, "Введите название организации", 200);
Строка = СокрЛП(Строка);

// 2. Находим разделитель ", ИНН "
Поз = Найти(Строка, ", ИНН ");

// 3. Название — всё до разделителя
Название = СокрЛП(Лев(Строка, Поз - 1));

// 4. ИНН — всё после разделителя (6 символов разделителя)
ИНН = СокрЛП(Сред(Строка, Поз + 6, СтрДлина(Строка) - Поз - 5));

// 5. Вывод
Сообщить("Название: " + Название);
Сообщить("ИНН: " + ИНН);