Const n=10;m=8; var a:array[1..n,1..m]of integer; b:array[1..m]of integer; i,j,min:integer; begin for i:=1 to n do begin writeln; for j:=1 to m do begin a[i,j]:=random(100); write(a[i,j]:4); end; end; writeln; for j:=1 to m do begin min:=a[i,1]; for i:=1 to n do if a[i,j]<min then min:=a[i,j]; b[j]:=min; end; for i:=1 to m do write(b[i]:4); end.
n=10;m=8;
var
a:array[1..n,1..m]of integer;
b:array[1..m]of integer;
i,j,min:integer;
begin
for i:=1 to n do
begin
writeln;
for j:=1 to m do
begin
a[i,j]:=random(100);
write(a[i,j]:4);
end;
end;
writeln;
for j:=1 to m do
begin
min:=a[i,1];
for i:=1 to n do
if a[i,j]<min then
min:=a[i,j];
b[j]:=min;
end;
for i:=1 to m do
write(b[i]:4);
end.
а) 453₁₀ = 111000101₂ = 705₈ = 1С5₁₆
б) 481₁₀ = 111100001₂ = 741₈ = 1E1₁₆
в) 461.25₁₀ = 111001101.01₂ = 715.2₈ = 1CD.4₁₆
г) 667.25₁₀ = 1010011011.01₂ = 1233.2₈ = 29B.4₁₆
д) 305.88₁₀ = 100110001.1110₂ = 461.7024₈ = 131.E147₁₆
--2--
а) 111001010₂ = 458₁₀
б) 1101110001₂ = 881₁₀
в) 1001010100.10001₂ = 596.53125₁₀
г) 111111110.11001₂ = 510.78125₁₀
д) 1634.35₈ = 924.453125₈
е) 6B.A₁₆ = 107.625₁₀
--3--
а) 101110001₂ + 101111001₂ = 1011101010₂
б) 1110001110₂ + 1100110111₂ = 11011000101₂
в) 10000011010.01₂ + 1010010110.01₂ = 11010110000.1₂
г) 1710.2₈ + 773.24₈ = 2703.44₈
д) 3E7.7₁₆ + 32.2₁₆ = 419.9₁₆
--4--
а) Прямой код: 0.1111000010₂ – 0.1110000011₂ = 0.0000111111₂
Обратный: 0.0000111101₂ – 0.0001111100₂ = 000000000000000.0000111111₂
Дополнительный: 0.0000111101₂ – 0.0001111100₂ = 000000000000000.0000111111₂