Запишите на языке Паскаль программу которая вычисляет сумму кодов букв в слове байт
const
b = байт;
var
l,i,s : integer;
begin
l := Length(b);
s := 0;
for i := 1 to l do
s := s +ord(b[i]);
writeln (s);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
