Укажите количество целых чисел в диапазоне от 100 до 200 (включительно), таких, что остаток от деления суммы четных цифр числа на 7 равен 6.

106 , 116 , 124 , 136 , 142 , 156,  160,  161,  163,  165,  167 , 169,  176,  196

Объяснение:

Написал программу, которая всё посчитала:

var i,sum,a:integer;

begin

for i:=100 to 200 do

 begin

   a:=i;

   sum:=0;

   while a > 0 do

     begin

       if (a mod 10) mod 2 = 0 then

         sum:=sum+a mod 10;

       a:=a div 10;

     end;

   if sum mod 7 = 6 then writeln(i);

 end;

end.

1)Материальные ресурсы – чаще всего сырье, ресурсы, материалы, которые человек обрабатывает для своих потребностей. Практически все материальные ресурсы одноразовые. Выплавив из руды металл – повторно использовать ту же руду не получится.

Информационные ресурсы – документы (книги , стать , публикации и т.д) , которые находятся в информационных системах (библиотеках, архивах, банках данных и т.п.). Другими словами это информация, хранящаяся на каком-то доступном носителе.

Основное отличие информационных ресурсов от материальных – это многократное их использование и копирование. Книга не уничтожится после прочтения и её можно скопировать. Таких действий совершить с материальными ресурсами не получится.  

2) основные виды национальных информационных ресурсов:

·         Библиотечные ресурсы 

·         Архивные ресурсы 

·         Научно-техническая информация 

·         Правовая информация 

·         Информация государственных (властных) структур 

·         Отраслевая информация 

·         Финансовая и экономическая информация

·         Информация о природных ресурсах 

·         Информация предприятий и учреждений

3) Здесь каждый сам может ответить, но если ничего не приходит в голову,то каждый чуловек точно пользовался следующими видами:

·         Библиотечными ресурсами – каждый хотя бы раз заходил в библиотеку за книгой.

·         Научно-техническая информация – сюда же можно отнести инструкции для каких-либо приборов и их починки.

·         Правовая информация – думаю конституцию и законы все хотя бы немного читали.

·         Информация предприятий и учереждений .

Код:

#include <iostream>

int* rearrange(int *A, int Asize) {

   int * result = new int[Asize];

   int p = 0;

   for (int i = 0; i < Asize; i += 2) {

       result[p] = A[i];

       ++p;

   }

   for (int i = 1; i < Asize; i += 2) {

       result[p] = A[i];

       ++p;

   }

   return result;

}

void print_arr(const int *A, int Asise) {

   for (int i = 0; i < Asise; ++i) {

       std::cout << A[i] << " ";

   }

}

int* change_it_k_times(int * const A, int Asize, int K) {

   int * result = A;

   for (auto i = 0; i < K; ++i) {

       result = rearrange(result, Asize);

       print_arr(result, Asize);

   }

   return result;

}

template <typename T>

void get_sequence(T* A, int N) {

   for (auto i = 0; i < N; ++i) {

       std::cin >> A[i];

   }

}

int main () {

   int N, K;

   std::cin >> N;

   auto A = new int[N];

   get_sequence(A, N);

   std::cin >> K;

   auto R = change_it_k_times(A, N, K);

   delete[] A;

   delete[] R;

   return 0;

}