Исходное число: 103
3*(100х+10у+3)+1=300+10х+у
290+29у=290
10х+у=10
так как числа у нас целые, то х=1, у=0.
Подставляем в формулу исходного числа:
100х+10у+3=100+0+3=103.
---
проверка:
103*3+1=309+1=310
103 ->310 (перестановка цифры 3 начало)
310=310 - верно.
--
1) 10101010011100₂ = 10908₁₀
25234₈ = 10908₁₀ =>
10101010011100₂ = 25234₈
2) 1C63₁₆ = 7267₁₀
1110001100011₂ = 7267₁₀ =>
1C63₁₆ = 1110001100011₂
Var
s, res: string;
k, i, j: integer;
c: char;
begin
read(s);
s := s + chr(10);
for i := 1 to length(s) do
if s[i] = c then
k := k + 1
else begin
if k <= 2 then
for j := 1 to k do
res := res + c
else
res := res + '^' + inttostr(k) + c;
c := s[i];
k := 1;
end;
writeln(res);
end.
Var
a:integer;
begin
read(a);
while(a <> 0) do
begin
write(a mod 10);
a := a div 10;
end;
<span>end.</span>
Данное число может быть в системах счисления со следующими основаниями: 1, 2, 3 и 4.