Подсчёт суммы элементов в введённой строке, Выдаёт ошибку Type Mismath Опции

[Lauri]

Код

program podschet;
uses crt;
var q,w,e:byte;
    s:string;

     begin
     clrscr;
     writeln ('BBedite ctpoky:');
     readln (s);
         readln;
     writeln ('Summa elementov: ');

     for w:=1 to length (s) do
       begin
       e:=e+s[w];
       end;
       write (e);
       readln;
     end.

Не пойму, почему когда я обращаюсь к элементу строки выдаётся такая ошибка...?

[klem4]

2 вопроса :

1) На сколько большими погут быть чила ? Или элементом может быть только цифра 0 или 1 или 2 ... или 9
2) как ращделены числа ? (если это числа а не цифры)

[Lauri]

Вообще я предполагал цифры от 0 до 9... ввести в строку и найти их сумму..