Visual Prolog. Разделения строки.

Разработайте программу разделения строки на две равные по длине части.

Необходимые предикаты:

string::front(String, Count, First, Last) — разделяет строку String на две строки First и Last, причем длина строки First равна Count.

Длина = string::length() — функция определения длины строки.

Для определения величины Count воспользуйтесь операцией целочисленного деления Длина div 2.