дано целое трехзначное число x составьте программу вычисления суммы и произведения цифр трехзначного числа x значения x ввести с клавиатуры

//PascalABC.NET//Версия 3.3, сборка 1627beginvar a:=abs(ReadInteger).Tostring.Select(x->x.ToDigit);writeln('сумма цифр: ',a.Sum);write('произведение цифр: ',a.Aggregate(Real(1),(x,y)->x*y));end.