Переведите в двоичную систему десятичное число 154.
переведите в десятичную систему двоичное число 101100101
Ответы на вопрос:
ответ: объяснение: если нужно с решением:
154₁₀ = 0*2⁰ + 1*2¹ + 0*2² + 1*2³ + 1*2⁴ + 0*2⁵ + 0*2⁶ + 1*2⁷ = 10011010₂
101100101₂ = 1*2⁰ + 0*2¹ + 1*2² + 0*2³ + 0*2⁴ + 1*2⁵ + 1*2⁶ + 0*2⁷ + 1*2⁸ = 357₁₀
ответ:
1.
var a: array[1..6]of integer;
i,k: integer;
begin
k: =0;
write('массив: ');
for i: = 1 to 6 do
begin
a[i]: = random(5);
write(a[i]: 4);
if a[i]=4 then k: =k+1
end;
writeln;
if k=0 then writeln ('в массиве нет элементов равных 4')
else writeln('количество элементов равных 4 равно ',k)
end.
2.
var a: array[1..6,1..6]of integer;
b: array[1..36]of integer;
i,j,k,z,y,m: integer;
begin
k: =0;
writeln('массив a ');
for i: = 1 to 6 do
begin
for j: = 1 to 6 do
begin
a[i,j]: = random(51);
write(a[i,j]: 3);
end;
writeln;
end;
writeln;
k: =1;
for i: = 1 to 6 do
begin
for j: = 1 to 6 do
begin
for z: =1 to 6 do
begin
for y: =1 to 6 do
begin
if (z< > i) and (y< > j) and (a[i,j] = a[z,y]) then
begin
b[k]: =a[i,j];
k: =k+1
end;
end;
end;
end;
end;
writeln('массив b ');
for i: = 1 to k-1 do write (b[i]: 3);
writeln;
writeln;
m: =b[1];
for i: = 2 to k-1 do if b[i]> m then m: =b[i];
writeln('максимум среди элементов повторившихся более одного раза в массиве а равен ',m);
end.
объяснение:
в массиве b во второй находятся повторяющиеся элементы массива а.
Популярно: Информатика
-
kcufka12345678922.08.2022 14:04
-
mashagalushko216.12.2022 10:31
-
lisasmirnova105.03.2023 16:28
-
samoilenkoludmi01.04.2022 03:49
-
Siberia1903.02.2023 00:41
-
Fadasa15.07.2021 15:34
-
Rika246821.06.2022 15:17
-
katya117227.09.2020 11:05
-
ShamilAshimbaj10.04.2022 15:25
-
daanya66628.09.2021 16:34