Question

1. Запишите на языке Паскаль программу, которая вычисляет
сумму кодов букв в слове «САЙТ».
Указание: достаточно объявить одну переменную целого типа (но может быть и другой вариант, как сработает ваше направление мысли). В эту переменную занести сумму кодов букв слова САЙТ. Чтобы определить код отдельного символа используем функцию ord, аргумент функции – символ заключенный в апострофы, например ord(‘Д’).

Answer 1

===PascalABC.NET===

program brainly;

var

 code :integer;

begin

 code += ord('С');

 code += ord('А');

 code += ord('Й');

 code += ord('Т');

 Write('Ответ: ', code);

end.

Также прикрепляю результат выполнения и саму программу во вложения.

1f68154c9d306a42aa1158574924e090.pas