Lazarus(delphi):
type
d=record
m1, d1, y1: integer;
end;
var s: string; d1: TDateTime;
begin
s:=edit1.text; (read(s));
d1:=strtoDate(s);
DecodeDate(d1, d[y1], d[m1], d[d1]);
end;
F(16)=1111(2)
1(16)=0001(2)
0(16)=0000(2)
9(16)=1001(2)
B(16)=1011(2)
1111 0001 0000 1001 1011 1011
делить на тройки надо с правого края
111 100 010 000 100 110 111 011
каждую тройку перевести в десятичное число
111(2)=1*2^0+1*2^1+1*2^2=7(8)
100(2)=4(8)
010(2)=2(8)
000(2)=0(8)
100(2)=4(8)
110(2)=6(8)
111(20=7(8)
011(2)=3(8)
Ответ 74204673(8)
Так они интуитивно переключаются. Т.е. для более сложных задач включается одна видеокарта, для простых - другая. (Надеюсь, объяснила)
171 из десятичной в шестнадцатеричную = <span>AB
206 </span> из десятичной в шестнадцатеричную =<span>CE
</span>171 из шестнадцатеричные в десятичную = <span>369
</span>206 из шестнадцатеричные в десятичную =<span>518</span>