Глава 3.4 задание 12, 13 информатика 8 класс

Question

Глава 3.4 задание 12, 13 информатика 8 класс

---

Answer 1

.Сочуствую ..................................''''''''

Answer 2

12. program code

Const s = ' БАЙТ ';

' var i, sum : integer;

begin

    sum := 0;

     for i := 1 to 4 do

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

     writeln  (sum);

    end.