Ответ:
чтобы определить информационный объем текста (печатного), нужно подсчитать общее количество отдельных символов (букв, знаков, пробелов) и умножить это количество на информационный объем одного символа (а это, как вы уже знаете, 1 байт). Конечно, для больших текстов точно подсчитать общее количество символов сложно, но можно подсчитать примерное количество символов в одной строке, умножить на количество строк на странице, а затем умножить на количество страниц.
Объяснение:
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var a:=ReadInteger('введите число a=').ToString();
writeln('сумма цифр: ',a[1].ToDigit()+a[2].ToDigit()+a[3].ToDigit()+a[4].ToDigit());
write('произведение: ',a[1].ToDigit()*a[2].ToDigit()*a[3].ToDigit()*a[4].ToDigit());
end.