М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Доминат
Доминат
10.10.2020 23:53 •  Информатика

Рассмотрим последовательность из нулей и единиц, которая генерируется по следующему правилу. исходно она состоит из одной единицы (1), на каждом следующем шаге к ней приписывается справа последовательность с предыдущего шага, в которой все нули поменяли на единицы, а единицы на нули. то есть, на первом шаге к ней приписывается 0 (получили 10), на втором шаге приписывается 01 (получили 1001) и так далее. выведите последние четыре цифры последовательности, полученной на 2018-м шаге, не разделяя их пробелами, например, 1111. комментарий. последние четыре цифры последовательности, полученной на втором шаге – это 1001 (они с самой последовательностью).

👇
Ответ:
IrishkaLis
IrishkaLis
10.10.2020
Если выписать несколько элементов последовательности то увидим закономерность
2k - заканчивается на 1001
2k+1 - заканчивается на 0110
k >= 1

2018 - четное следовательно ответ 1001
4,6(46 оценок)
Открыть все ответы
Ответ:
сонька177
сонька177
10.10.2020
Var m : array[0..6] of Integer;
  i,k,N : Integer;
Begin
  For i:=0 to 6 do m[i]:=0;
  Readln(N);
  k:=6;
  While N>0 do
  Begin
    If N>=Power(2,k) then
    Begin
      N:=N-Trunc(Power(2,k));
      Inc(m[k]);
    end else Dec(k);
  end;
  For i:=0 to 6 do Writeln(Power(2,i),'  ',m[i],' шт.');
end.

Еще вариант:
Const
  NN = 7;
  money : array[1..7] of Integer = (1,2,4,8,16,32,64);
Var m : array[1..NN] of Integer;
  i,k,N : Integer;
Begin
  For i:=1 to NN do m[i]:=0;
  Readln(N);
  k:=NN;
  While N>0 do
  Begin
    If N>=money[k] then
    Begin
      N:=N-money[k];
      Inc(m[k]);
    end else Dec(k);
  end;
  For i:=1 to NN do Writeln(money[i],'  ',m[i],' шт.');
end.
4,7(42 оценок)
Ответ:
kazinka9
kazinka9
10.10.2020
Интернет по сути своей не представляет опасности для подрастающего поколения. Вредоносное влияние оказывают многочисленные сайты и всплывающие окна рекламного характера. Помимо образовательной роли виртуальная реальность таит и множество негативных моментов, в особенности для детей. Это может быть:

незаконный контент: «взрослая» реклама табака, алкоголя, секса, азартные игры, порнография;платные сервисы и услуги, которые оплачиваются отдельно;призывы к асоциальному поведению, насилию и жестокости;пропаганда сексуальной эксплуатации и суицидального поведения;общение на форумах и чатах с мошенниками, аферистами и преступниками под личиной доброжелателей;вынуждение предоставления личной информации ребенка или его семьи, которая может быть использована в преступных целях;Интернет-зависимость.
4,4(26 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ