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

const

  s = БАЙТ;

var

  i, sum : integer;

begin

  sum := 0;

  for i := 1 to 4 do

    sum := sum + ord (s[i]);

  writeln (sum);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку