Question

Запишите на языке Паскаль программу, которая определяет сумму и произведение цифр числа 39.

Answer 1

                                     PascalABC.NET                                      

Ответ:

• begin
• var a := Arr((39).ToString.AsEnumerable).ConvertAll(c->c.ToDigit);
• a.Sum.Println;
• a.Aggregate(1,(p,c)->p*c).Println;
• end.

Пример работы: