Решаем задачи Абрамян на Кумире. Integer 11

Integer11. Дано трехзначное число. Найти сумму и произведение его цифр.
Решение от Дмитрия:

алг integer11 (арг цел число, рез цел сумма, произведение)

дано 99<число<1000

надо

|сумма и произведение цифр

нач

цел единицы, частное, десятки, сотни

единицы:=mod(число,10)

частное:=div(число,10)

десятки:=mod(частное,10)

сотни:=div(частное,10)

сумма:=единицы+сотни+десятки

произведение:=единицы*сотни*десятки

кон

Другие задачи из раздела Integer можно посмотреть здесь.