4. Вспомните одному объекту каждого приведённых множеств и обозначьте его единичным именеммножестве:а) мореплаватель;б) орфограмма;в) формула;г) былина.5. Назовите общие имена объектов, о которых сообщается впутеводителях. Назовите единичные имена объектов, о кото-рых может рассказать человек после туристической поездкипо России.6. Каким образом можно узнать признаки интересующих васобъектов?7. Какие свойства можно привести при описании множестваобъектов? Можно ли для множества объектов привести зна-чения величин? Приведите примеры.8. Для каждого примера укажите объект, его свойство, опреде-ляющую свойство величину и её значение:а) рыжеволосый человек;б) семикилограммовый арбуз;в) фарфоровая чашка;г) семнадцатидюймовый монитор.9. Назовите для каждого из приведённых действий два пред-мета, с которыми указанное действие человек выполняет по-разному: собрать;заполнить; открыть; связать; включить;сложить; измерить; поймать.
Ответы
Максимальная цифра м.б. 9, значит сумма цифр не может быть больше 18
1) Сначала уберем из списка все возрастающие - 1619 316 916
останется 1616 169 163 1916 116
2) Из этого списка удалим также 1916, т.к 19 не может быть (сумма цифр макс 18)
Останется 1616 169 163 116
3) Рассмотрим, все ли числа могли получится, как результат сложения
1616 могло получится, если число, например, 888. Значит его оставляем
169 - например, 972 или 881. Значит, тоже подходит
163 - 16 может получиться как сумма 8+8 7+9, но тогда мы не получим 3. Т.е. это число не подходит - удаляем
116 - это, например, 560, 651, т.е подходит
Значит осталось 1616, 169, 116
ответ: 3
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Почему принтер является дополнительным устройством
Автор: Valentina
Выполни действие и запиши верный ответ. 8mod5=
Автор: tkmandarin8376
Задан массив а[1..5, 1..6]. поменять в нем местами первый и последний столбец.
Автор: Sergeevich-irina
Задание 3. отметь показатели ультразвукового датчика
Автор: Александрович_Викторовна
Братаны мне ! (если кто знает скажите
Автор: SERGEI124
Технические и программные ресурсы интернета?
Автор: Arsen0708
var a:array[1..n]of integer;
i,b,k,c,f,g,h:integer;
begin
for i:=1 to n do a[i]:=Random(70)-20;
for i:=1 to n do
write(a[i],' ');
writeln;
for i:=1 to n do begin
if (a[i] mod 5 = 0) and (a[i] mod 10<>0) or (a[i]=50) then begin
b:=i;
for b:=i to (n-1) do
a[i]:=a[i+1];
end; end;
for i:=1 to n do
write(a[i],' ');
write('введите к ');
read(k);
for i:=1 to n do begin
if a[i] mod i = 0 then begin
c:=i;
for i:=n downto c+1 do begin
a[i]:=a[i-1];
a[c+1]:=k;
end;end;end;
for i:=1 to n do
write(a[i],' ');
writeln;
f:=0; g:=0;
for i:=n downto 1 do begin
if (a[i]>0) then f:=i;
end;
if a[f]=0 then write('нет положительных ');
for i:=n downto 1 do begin
if (a[i]<0) then g:=i;
end;
if (a[g]=0) then write('нет отрицательных ');
if (a[f]<>0) and (a[g]<>0) then begin
h:=a[f]; a[f]:=a[g]; a[g]:=h; end;
for i:=1 to n do
write(a[i],' ');
writeln;
end.