Такой вопрос,как отыскать в строке последнее вхождение элемента.Есть ли для этого какие-нибудь процедуры,кроме POS(Subst,ST),который отыскивает только первое вхождение.
последнее вхождение символа ch в строку s
i := length(s);
find := 0;
while(i>=1) and (find=0) do
if s[i]=ch then find := i
else dec(i);