Разработайте на псевдокоде алгоритм (а если хочется и можется - реализующую его программу) вычисления суммы и произведения цифр трёхзначного натурального числа (будем считать, что данные точно корректны). напишите решение на языке 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; begin Write('Введи число: '); 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.
То есть 1,2,3. потом их сложить или перемножить.
Чтобы найти первое число нужно 123 разделить на 100,получиться 1.23,его мы округляем и получаем 1.
Второе мы находим деля 123 на 100,получаем остаток 23, делим остаток на 10 и получаем 2.
Третье число мы находим деля 123 на 10 и получаем остаток.
Потом складываем их или перемножаем.
Пример на pascal:
//div это делить,mod отстаток
var a,b,c,s: integer;
begin
Write('Введи число: ');
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.