Вопрос Помогите написать программу на языке Pascal.

[shinnid]

Помогите написать программу на языке Pascal, которая вычисляет сумму кодов букв, в словах до 10 символов. (например в слове бамбук)

 

[YouTub`chik]

есть операции которые переводят посимвольно строку в анси коды и там можешь скоко угодно суммировать.... лучший выбор.. не справишься - пиши пм

 

[vodka]

var s: string; i, summ: integer; begin readln(s); summ := 0; for i:=1 to Length(s) do summ := summ + ord(s); writeln(summ); end.

 

[Krasich]

Примерно так: var s:string[10]; aacked array[1..10] of byte absolute s[1]; ss:integer; i:integer; begin readln(s); ss:=0; for i:=1 to Length(s) do ss:=ss+a; writeln(ss); end.