Ниже записан алгоритм. Укажитенаименьшее из таких чисел x, привводе которых алгоритм печатает сначала 4, а потом 0.var x, a,b, c: integer;begin readln(x); a:= 0; b:= 0; while x > 0 do begin   c:= x mod 2;   if c = 0 then a:= a + 1   else b:= b + 1;   x:= x div 6; end; writeln(a); writeln(b);end.

По условию мы видим, что а - 4, б - 0 ( в конце задачи )
Такое может произойти из условия, что на вход поступит четное число, которое сможет поделится на 6 4 раза, ни разу не обернувшись в нечетное, ибо тогда станет б>0, что не есть верно.
6^3*2 = 432, именно это и есть . : 432

*Решение написано мной собственноручно, без помощи сторонних лиц, ресурсов