ch:char
先把字串读进wordarray
而i 是字串的长度
这procedure 是希望数字串内a至z出现的次数
但我这个数不到 我错了什么?
谢谢

procedure Anafreq;
begin  
    for ch:='a' to 'z'do 
    Carray[ch]:=0;
    for i:= 1 to i do
    begin
    wordarray[i]:=ch;
    Carray[ch]:=Carray[ch]+1;
    writeln(wordarray[i]);
    writeln(carray[ch]);
    end;
  for ch:='a' to 'z' do
     writeln(ch, carray[ch]);  
 
end;