Информатика, вопрос задал vernionz123 , 7 лет назад

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

Приложения:

Ответы на вопрос

Ответил aslan76
0
.Сочуствую ..................................''''''''
Ответил MiciNau01
0

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.

Новые вопросы