Как мне записать на языке Паскаль программу,которая вычисляет сумму кодов букв в слове БАЙТ.

что-то не очень верно записана задача
что за сумма кодов?
количество символов в слове это команда length
к примеру
var
  S : String;

begin
 ReadLn(S);        // пишем байт
 WriteLn('"', S, '"');
 WriteLn('Длина = ', Length(S));
end. 

если надо сумму цифр которыми кодируются русские буквы на клавиатуре, то таблица в прикрепленном файле, думаю не составит труда написать простейшую программку для сложения