Как зашифровать и расшифровать слово из Полибианского квадрата в Delphi 7?
 

Помогите пожалуйста решить следующую задачу :)
Одним из первых шифров простой замены считается так называемый "полибианский квадрат". За два века до нашей эры греческий писатель и историк Полибий изобрел для целей шифрования квадратную таблицу размером 5x5, заполненную буквами греческого алфавита в случайном порядке. (Рис.6.)
l e u w g
r z d s o
m h b x t
y p q a k
c n j i

Рис.6. Полибианский квадрат, заполненный случайным образом 24 буквами греческого алфавита и пробелом.
При шифровании в этом полибианском квадрате находили очередную букву открытого текста и записывали в шифртекст букву, расположенную ниже ее в том же столбце. Если буква текста оказывалась нижней в строке таблицы, то для шифр текста брали самую верхнюю букву из того же столбца.
Например, для слова tauron получается шифртекст kjdmte.
Концепция полибианского квадрата оказалась плодотворной и нашла применение в криптосистемах последующего времени.