2. Дано двозначне натуральне число. Знайдіть суму і добуток його цифр. Вхідні дані

Одне двозначне натуральне число п (10 <n< 99).

Вихідні дані

Виведіть в одному рядку суму і добуток цифр числа n.​

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(20,2,5);Write('Оценки за диктант: ');a.Println;
Writeln('Двоек: ', a.Where(t-> t = 2).Count);
Writeln('Троек: ', a.Where(t-> t = 3).Count);
Writeln('Четверок: ', a.Where(t-> t = 4).Count);
Writeln('Пятерок: ', a.Where(t-> t = 5).Count);
Writeln('Средний за диктант: ', a.Average:0:2);
end.

Пример:
Оценки за диктант: 4 3 2 3 5 3 3 2 5 2 3 5 4 3 3 4 2 2 3 2
Двоек: 6
Троек: 8
Четверок: 3
Пятерок: 3
Средний за диктант: 3.15

Через поле и лесок Подается голосок. Он бежит по проводам - Скажешь здесь, А слышно там.-Телефон
Под крышей — четыре ножки,
А на крыше — суп да ложки.-Cтол
Важных данных я хранитель,
Информации носитель,
Гибкая,так что же это?
Я магнитная ?-Дискета.

Я блокнот и память я,
Есть и электронная.
Записи я все веду,
Всё фиксирую и жду.
                         книжка

Не пищу и не шуршу,
А с компьютером-дружу.
Я курсором управляю,
И командам
                        мышка

Осенью,я всех встречаю.
Летом,просто отдыхаю.
Весь учебный год-учу,
Дарить знания хочу.
                          школа
P.S Если тебе понравилса ответ будь добр поставь лучший ответ.