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

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

Задать свой вопрос
1 ответ
Var 
st: string; 
i: byte; 
sum: integer;  
begin 
st := 'БАЙТ'; 
for i:=1 to Length(st) do sum:=sum+ord(st[i]); 
Writeln('Сумма кодов букв в слове Б = ', sum);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт