Assasin, Вопрос на засыпку:
Строка до 255 знаков. Есть схема:
code_23475.txt

Результат компиляции:
code_23476.txt
1. Почему не работает ?
2. Откуда взялось Len1 ?

P.S. В IC, даже не используя фирменый Length(), этот вопрос решается простым n:=s[0];