Разложи на разрядность ис считай таким же образом как и 2-ю в 10-ю.
45 - 33
56 - 41
<span>1. вечный двигатель, </span><span>числа, которые делятся на 0</span>
<span>2. Солнце, Москва</span>
<span>3. гласные буквы в русском алфавите </span>
<span>4. числа больше 1 </span>
n = int(input())
k = int(input())
print("Каждому по ",k//n," ябл.")
Пример:
4
10
Каждому по 2 ябл.
Var n,k:integer;
begin
read(n);
while (n>0) do begin
k+=1;
n:=n div 10;
end;
writeln(k);
<span>end.</span>