Предмет: Информатика,
автор: vernionz123
глава 3.4 задание 12, 13 информатика 8 класс
Приложения:
Ответы
Автор ответа:
0
.Сочуствую ..................................''''''''
Автор ответа:
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.
Похожие вопросы
Предмет: Геометрия,
автор: hasajkaoahau
Предмет: Английский язык,
автор: Катюня0909
Предмет: Русский язык,
автор: Аноним
Предмет: Биология,
автор: Аноним
Предмет: Биология,
автор: ricaty2