Написать программу, где вводиться число и находитьяс сумма цифр(Паскаль, или Lazarus)

Question

Написать программу, где вводиться число и находитьяс сумма цифр(Паскаль, или Lazarus)

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write('сумма цифр: ',abs(ReadInteger('введите число:')).ToString.Select(x->x.ToDigit).Sum);
end.

Comments

А как же быть с числом больше Int32

---

Ошибка времени выполнения: Значение было недопустимо малым или недопустимо большим для Int32.