Question

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

Answer 1

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