Написать программку (полностью) для нахождения творенье суммы нечетных цифр и их

Написать программку (вполне) для нахождения произведение суммы нечетных цифр и их минимума в четырехзначном числе. Программка обязана начинаться следующим образом и не содержать других переменных не считая данных. var min, digit, s, n, res :integer; begin readln(n); Входные данные: Четырехзначное число. Выходные данные: Итог