Разбить строку на две строки

[Tnusha51]

Добрый вечер. Необходимо разбить строку на две. Получить количество символов в строке. Если больше 140, то в первой оставляем 140,остальное кидаем во вторую строку. Если в
Строке меньше 140,оставляем всё как есть. Как можно реализовать? Спасибо

[alexandr_ll]

Добрый вечер. Необходимо разбить строку на две. Получить количество символов в строке. Если больше 140, то в первой оставляем 140,остальное кидаем во вторую строку. Если в
Строке меньше 140,оставляем всё как есть. Как можно реализовать? Спасибо

Код Выделить Развернуть

Исходная=Заданная;
Стр1=Лев(Исъодная,140);
Стр2=Сред(Исходная,141);