1) 10101-1110=111₂
2) 111₂=2²*1+2*1+2⁰*1=4+2+1=7₁₀
Var n,s,a,m:longint;
begin
readln(n,s);
m:=10;
if s mod n=0 then a:=s else a:=s*10;
while a mod n<>0 do
if a mod m=(m-1)
then begin m:=m*10; a:=s*m; end
else a:=a+1;
writeln(a);
end.
Пример:
123 16
<span>16113</span>
28,25 байт
0,0276 кбайт
0,0000269 мегабайт<span>
0,221 килобита</span>
<span>0,000216</span> мегабита
В остальное там 200 символов.