Трехзначное число, записанное в шестнадцатеричной системе счисления, увеличива-ется вдвое от перестановки первой цифры в конец числа. Определите максимальное из таких чисел, записанное в системе счисления по основанию 16.

var   i,j,k,ix,jx,kx:integer;   s:string; function per(x:integer):string; begin case x of   10: result:='A';   11: result:='B';   12: result:='C';   13: result:='D';   14: result:='E';   15: result:='F';   else     str(x,result);   end; end; begin for i:=1 to 15 do   for j:=0 to 15 do     for k:=0 to 15 do       if 2*(i*16*16+j*16+k)=j*16*16+k*16+i then          begin          ix:=i;          jx:=j;          kx:=k;          end; s:=per(ix)+per(jx)+per(kx); writeln(s);      end.  В результате работы программы получаем ответ. Ответ: 6DB