Var n,sum,pr,a:integer;
begin
readln(n);
sum:=0
pr:=1;
while n<>0 do
begin
a:=n mod 10;
sum:=sum+a;
pr:=pr*a;
n:=n div 10;
end;
writeln(sum,' ',pr);
end.
10 = 0000 0000 0000 1010 = 000A
т,к. в памяти компьютера порядок little-endian, то число будет записано в обратном порядке: А000
Ответ:
1122
Объяснение:
Заменим команды на обратные:
1. умножь на 3 - раздели на 3
2. вычти 2 - прибавь 2
Пойдем от большего числа к меньшему учитывая, что в результате действий должны получаться только целые числа
23+2=25 (2)
25+2=27 (2)
27/3=9 (1)
9/3=3 (1)
Запишем произведённые действия снизу вверх 1122