Получив на вход натуральное число 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.
Задание

Получив на вход натуральное число 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.