Получив на вход натуральное число x, этот алгоритм печатает два числа: a и b. сколько существует таких чисел x, при вводе которых алгоритм печатает сначала 4, а потом 5? var x, a, b: longint; begin readln(x); a : = 0; while x > 0 do begin a : = a+1; b : = x mod 6; x : = x div 6; end; writeln(a); write(b); end.
Решал методом подбора через PascalABC.
ответ: 215 чисел существует