Предмет: Информатика, автор: vernionz123

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

Приложения:

Ответы

Автор ответа: aslan76
0
.Сочуствую ..................................''''''''
Автор ответа: MiciNau01
1

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.

Похожие вопросы
Предмет: Английский язык, автор: Катюня0909
Предмет: Биология, автор: Аноним