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

Var 
st: string; 
i: byte; 
sum: integer;  
begin 
st := БАЙТ; 
for i:=1 to Length(st) do sum:=sum+ord(st[i]); 
Writeln(Сумма кодов букв в слове БАЙТ = , sum);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.