Predpokladám, že robíš v console :
var i:Integer;
c:Char;
s:String = 'Rozlozenie STRINGU';
...
...
begin
for i:= 1 to Length(s) do
begin;
c:= s[i]; // uloží ti každý znak do premeny C typu CHAR - znak
...
write(c);
end;
end.