Среди конструкторов для создания мобильных интернет-магазинов выберите универсальный конструктор
1. mobicart 2. mobicommerce 3. elite mcommerce 4. appsgeyser
определите для какого компьютера неверно задана маска локальной сети
1) 255.255.255.0
2) 255.255.160.0
3) 255.255.240.0
4) 255.255.192.0
в классе 16 мальчиков и 16 девочек. у всех учащихся разные фамилии. учитель выбирает учащегося, который должен пойти отвечать. сколько бит информации несет сообщение «отвечая у доски, иванов сергей получил оценку «хорошо»?
1) 5 бит: 2) 6 бит; 3)7 биг: 4) 8 бит.
===== PascalABC.NET =====
procedure MyCompare<T>(P, Q: HashSet<T>);
begin
if P.SetEquals(Q) then
Print('Множества эквивалентны')
else if P.IsSubsetOf(Q) then
Print('Первое множенство является подмножеством второго')
else if P.IsSupersetOf(Q) then
Print('Второе множенство является подмножеством первого')
else
Print('Проверка множеств завершена')
end;
begin
var n := ReadInteger('Мощность первого множества:');
var P := ReadSeqInteger('Введите элементы множества:', n).ToHashSet;
n := ReadInteger('Мощность второго множества:');
var Q := ReadSeqInteger('Введите элементы множества:', n).ToHashSet;
MyCompare(P, Q)
end.
ок) так много ) я решу)
ты немного непонятно написал условие, я написал два варианта...
1) если нужно посчитать сумму трёхзначных чисел которые заканчиваются на 7 и делятся на 3 без остатка
sum = 0
n = int(input))
while n != 0:
if len(str(n)) == 3 and n % 3 == 0 and n % 10 == 7:
sum += n
n = int(input))
print(sum)
2) если нужно посчитать сумму чисел которые либо трёхзначные либо заканчиваются на 7 либо кратны 3
sum = 0
n = int(input))
while n != 0:
if len(str(n)) == 3 or n % 3 == 0 ot n % 10 == 7:
sum += n
n = int(input))
print(sum)