---

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

Поз = Найти(Строка, ", ИНН ");
Название = СокрЛП(Лев(Строка, Поз - 1));
ИНН = Прав(Строка, 10);

Сообщить("Название: " + Название);
Сообщить("ИНН: " + ИНН);