Дано натуральное трехзначное число N. Определить сумму и произведение его цифр.…

Ну, я думаю с файлами ты сама справишься. Пишу сами действия: var n,s,p,a: integer; {n — число} Begin///// Считываешь инфуs: =s+(n mod 10); // к сумме прибавляем последнюю цифруp: =p*(n mod 10); // на произведение умножаем последнюю цифруa: =n div 10; // берем из 3 х знач числа 2 х значное. Например было 123 стало 12s: =s+(a mod 10); // берем последнюю цифру 2 х значного числа (2) к суммеp: =p*(a mod 10); // берем последнюю цифру 2 х значного числа (2) к произведениюa: =n div 10; // Берем 1-значное число из 2 х значного (1) s: =s+a; // Прибавляем сотый разряд к суммеp: =p*a; // к произведению//// записываешь инфуend. p — роизведениеs — сумма