Разработайте на псевдокоде алгоритм (а если хочется и можется - реализующую его программу) вычисления суммы и произведения цифр трёхзначного натурального числа (будем считать, что данные точно корректны). Напишите пожалуйста решение на языке visual basic

Вычисление последнего числа в примере ты представил неправильно.

Извиняюсь.Сейчас исправлю

Допустим число 123. Нам нужно найти первое, второе и третье его число.То есть 1,2,3. потом их сложить или перемножить. Чтобы найти первое число нужно 123 разделить на 100,получиться 1.23,его мы округляем и получаем 1.Второе мы находим деля 123 на 100,получаем остаток 23, делим остаток на 10 и получаем 2.Третье число мы находим деля 123 на 10 и получаем остаток.Потом складываем их или перемножаем.Пример на  pascal://div это делить,mod отстатокvar a,b,c,s: integer;beginWrite('Введи число: ');Read(s);a:= s div 100;b:= s mod 100 div 10;c:= s mod 10;WriteLn('Сумма: '+a+b+c);WriteLn('Произведение: '+a*b*c);end.