1).перевести число 13a,f1c(16-ричная сс) в 2-ю , 4-ю, 8-ю системы счисления. 2). перевести число 712,345(8-ричная сс) в 2-ю, 4-ю, 16-ю системы счисления. 3). перевести число 320,012(4-ричная сс) в 2-ю, 8-ю, 16-ю систему счисления.
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016 begin var a:=SeqRandom(5,10,99).Sorted.ToArray; Writeln('a=',a); var b:=SeqRandom(5,10,99).Sorted.ToArray; Writeln('b=',b); var c:=new integer[10]; var i:=0; var j:=0; var k:=0; while (i<5) and (j<5) do begin if a[i]<b[j] then begin c[k]:=a[i]; Inc(i) end else begin c[k]:=b[j]; Inc(j) end; Inc(k) end; if i=5 then for var m:=j to 4 do begin c[k]:=b[m]; Inc(k) end else for var m:=i to 4 do begin c[k]:=a[m]; Inc(k) end; Writeln('c=',c) end.
13A,F1C(16) = 10322.33013(4)
13A,F1C(16) = 472.7434(8)
2)712,345(8) = 111001010.011100101(2)
712,345(8) = 13022.13022(4)
712,345(8) = 1CA.728(16)
3)320,012(4) = 111000.00011(2)
320,012(4) = 70.06(8)
320,012(4) = 38.18(16)