:) получив на вход число x этот алгоритм печатает число m. известно что x> 100. укажите наименьшее такое число x при вводе которого алгоритм печатает 16 var x,l,m: integer; begin readln(x); l: =x-16; m: =x+16; while l< > m do if l> m then l: =l-m else m: =m-l; writeln(m); end.