написать программу Паскаль Задана арифметическая прогрессия 2; 2.8 ... . сколько членов прогрессии нужно сложить чтобы полученная сумма стала больше 20
Ответы на вопрос:
var x,s,k:real;
begin
x:=2;
While s<=20 do
begin
s:=s+x;
k:=k+1;
x:=x+0.8;
end;
write(k);
end.
Объяснение:
A and B = 01010010 = 82
Объяснение:
Для начала представим в виде битовой строки
А OR B = 87 = 01010111
А XOR B = 5 = 00000101
XOR дает логическую единицу если исходные данные различаются и ноль, если одинаковые. Значит у A и B только нулевой и второй (если считать справа) биты разные. То есть
A = 1x1
B = 0x0
В данном случае без разницы у кого будет 1, а у кого ноль, потому как нам нужно будет узнать их логическое И, которое от перестановки не меняется.
Далее опираемся на логические единицы в побитовом ИЛИ, то есть биты, которые стали логической единицей будут ей же в исходных A и B, нули соответственно тоже. Итого получаем.
A = 01010111
B = 01010010
Теперь побитово считаем И
A and B = 01010010 = 82
Популярно: Информатика
-
Nicoleta2310.02.2022 10:42
-
usereldoc985702.02.2021 01:03
-
Мюсли00419.04.2021 19:25
-
Andylov02.08.2021 16:21
-
куцев16.09.2021 02:28
-
вера73104.04.2022 04:00
-
НикВероник122.02.2020 10:46
-
Cektumcempra22.03.2020 07:04
-
Ринатеовллктаоа26.03.2023 05:03
-
gsajhja03.08.2021 15:01