Разработайте на псевдокоде алгоритм (а если хочется и можется - реализующую его программу) вычисления суммы и произведения цифр трёхзначного натурального числа (будем считать, что данные точно корректны).

begin
  var n:=ReadInteger('Введите натуральное трехзначное число');
  var s:=Abs(n).ToString;
  Assert(s.Length=3,'Некрасиво нарушать условие!');
  var a:=s.Select(t->t.ToDigit).ToArray;
  Writeln('Сумма цифр равна ',a.Sum,', произведение ',a[0]*a[1]*a[2])
end.


Введите натуральное трехзначное число 528
Сумма цифр равна 15, произведение 80