Дано a=82_{16}, b=701_8. Выберите число с, записанное в двоичной системе, которое отвечает условию a<c<b. Число в 16-ой и 8-ой системе очень легко записать в двоичное системе расписав каждую цифру числа на черыре цифры у 16-го числа и на три цифры у 8-го числа Первое число 82(в 16) 8 =1000(в двоичной системе) 2= 0010 82 =10000010 Второе число 701(в 8 системе) 7=111( в двоичной системе) 0=000 1=001 701=111000001 Данные системы счисления относятся к позиционным поэтому вес каждой цифры зависит от ее положения Число с удолетворяющее условию a<c<b равняется 11010111 11010111(2) =327(8)=D7(16)
Число в 16-ой и 8-ой системе очень легко записать в двоичное системе расписав каждую цифру числа на черыре цифры у 16-го числа и на три цифры у 8-го числа
Первое число 82(в 16)
8 =1000(в двоичной системе)
2= 0010
82 =10000010
Второе число 701(в 8 системе)
7=111( в двоичной системе)
0=000
1=001
701=111000001
Данные системы счисления относятся к позиционным поэтому вес каждой цифры зависит от ее положения
Число с удолетворяющее условию a<c<b равняется 11010111
11010111(2) =327(8)=D7(16)
var
a,b,c:array [1..20] of integer;
i,k,l:integer;
begin
randomize;
k:=1;
l:=1;
writeln ('Исходный массив: ');
for i:=1 to 20 do
begin
a[i]:=random(9)+1;
if a[i] mod 2 = 0 then
begin
b[k]:=a[i];
inc(k);
end else
begin
c[l]:=a[i];
inc(l);
end;
write (a[i],' ');
end;
k:=k-1;
l:=l-1;
writeln;
writeln ('Массив четных чисел');
for i:=1 to k do write (b[i],' ');
writeln;
writeln ('Массив нечетных чисел');
for i:=1 to l do write (c[i],' ');
writeln;
readln;
end.