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