Как на Pascal ABC написать программку, которая будет считать сумму цифр

Начнем с того, что компьютер стандартным образом не может обрабатывать числа, значение которых выходит за пределы отведенного тому или иному типу данных спектра. К примеру, в стандартном Паскале самое "длинноватое" целое число не может превосходить значения 2-ух в 30 первой степени минус один, т.е. 2147483647, а это всего только десятизначное число. Огромные числа надобно моделировать, использую для этого символьные строки, содержащие последовательность цифр, изображающую число.

В версии PascalABC.Net можно также использовать тип данных BigInteger, у которого количество цифр практически не ограничено, но и такие числа необходимо вводить, как символьные строчки.

я ,опасаюсь, что ей эта информация не нужна.

Это теснее не моё дело...

Когда я вижу в условии что-то про "количество неведомо", то решать не берусь, если это "безызвестное" нельзя указать при вводе данных (как, к образцу, указать количество частей в массиве)..

Var a,b,c,d:integer;
begin
writeln('введите число'); //запрос числа
readln(a);
d:=a;                 //это для красы
while (alt;gt;0) do begin //пока мы не дойдём до заключительной цифры в числе делать последующее
  b:=a mod 10;        //берём последнюю цифру числа 
  c:=c+b;             //обретаем сумму цифр
  a:=a div 10;        //убираем из данного числа заключительную цифру
  end;
 writeln('сумма цифр числа ',d,' = ',c); // вывод результата
end.