хочу сделать прогу русский в транслит но как?

Положим есть строка s на входе.

for i:=1 to length(s) do  s:=translit(s[i]);

ну а translit можно реализовать в виде функции или массива.
Если массива то так...

type
 arr=array['а'..'я'] of string;
const  translit:arr=('a',  ...   ,'ia');

(только заполни полностью массив translit )...
ну вообще хорошо бы в таком случае сделать массив от #0 до #255, потому что volvo как то показывал( здесь и здесь ), что там разорванное множество получается в случае кирилического алфавита (в ASCII есть разрыв).

А вообще я вот сейчас подумал о том, что это интересная фраза,
"идентификатор в выражении может быть массивом или функцией".. философия ведь целая...
Это говорит о том, что вообще говоря, что модель решения можно реализовать по разному на практике.

Ну, допустим, это был не klem4
Задача на строки
+
Множественный тип данных

Исправил