Задание
Получив на вход натуральное число x, эта программа на языке Pascal печатает два числа: a и b. Укажите наименьшее натуральное число, при вводе которого алгоритм печатает сначала 5, а потом 16.
var x, a, b: longint;
begin
readln\(x\);
a := 0; b := 1;
while x > 0 do begin
if x mod 2 > 0 then
a := a + x mod 12
else
b := b * \(x mod 12\);
x := x div 12;
end;
writeln\(a\); write\(b\);
end.