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

Ответы 1

  • const

      s = 'БАЙТ';

    var

      i, sum : integer;

    begin

      sum := 0;

      for i := 1 to 4 do

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

      writeln (sum);

    end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years