Язык программирования Фри Паскаль, какой оператор применить? см. далее

допустим что S - список фирм и является одномерным массивом тогда:
var
S,P: array [0..10] of string //11 фирм
a,b: char;
...

begin
//Р - массив найденных фирм, или можно сразу выводить как найдем, это тебе решать
//как то заполняем этот массив, это не важно как.. , пропустим, примем за факт его заполнение
//допустим переменная a - буква по которой будем искать и ее тоже указал пользователь
//найдем фирмы с окончанием на переменную а:
for i:=0 to 10 do //11 фирм
begin
b:= copy(S[ i],length(S[ i]-1),1) // последний символ
if b=a then
writeln(S[ i]); //если введенный символ равен последнему символу то выводим фирму
end;
end;
end;
дальше сама

k:= length(o); if copy(a[ i],length(a[ i]-k),k)=o then writeln(a[ i]);

Тут o - строка с заданными последними буквами, a - массив названий предприятий,

зачем, просто строку потом цыклом делиш на елементы одномерные береш останние, что конкретно не идет???

чот не очень понятно, напиши задание полностью (исходное) .
P.S.:зачем в массиве если можно через строку?

Бред.. . Откуда берется иннфа о компание и какие именно заданые буквы? заданые буквы "абс" или заданые 3 буквы с конца названия компании? напишите все задание. и возможно Вам будет проще в этом задание использовать запись, а не просто одномерный массив.