В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
ivannaprokuror
ivannaprokuror
12.05.2023 10:31 •  Информатика

Одномерные массивы c++
вывести элементы числового одномерного массива c(n), которые одновременно кратны 2 и 7. расположить их на четные места массива.

Показать ответ
Ответ:
190G
190G
23.09.2021 17:30

program Numfind;

uses

 System.SysUtils;

var

 a: array [1..10] of Integer;   // 1..10 размерность массива можно изменять, программа будет работать правильно

 i, s: Integer;

begin

 Randomize;

 for i := Low(a) to High(a) do

   a[i] := - 25 + Random (151);

 WriteLn ('Массив чисел:');

 for i := Low(a) to High(a) do

   Write (a [i], ' ');

 s := 0;

 WriteLn;

 WriteLn;

 WriteLn ('Выбрано: ');

 for i := Low(a) to High(a) do begin  // цикл выбора чисел больше 20

   if (a [i] > 20) then begin

     s := s + a [i];

     Write (A [i], ' ');

   end;

 end;

 WriteLn;

 WriteLn ('Сумма чисел больше 20 = ', s);

 s := 0;

 WriteLn;

 WriteLn ('Выбрано: ');

 for i := Low(a) to High(a) do begin  // цикл выбора чисел меньше 100

   if (a [i] > 0) and (a [i] < 100) then begin

     s := s + a [i];

     Write (A [i], ' ');

   end;

 end;

 WriteLn;

 WriteLn ('Сумма чисел меньше 100 = ', s);

 s := 0;

 WriteLn;

 WriteLn ('Выбрано: ');

 for i := Low(a) to High(a) do begin  // цикл выбора чисел кратных 3

   if (a [i] > 0) and (a [i] mod 3 = 0) then begin

     s := s + a [i];

     Write (A [i], ' ');

   end;

 end;

 WriteLn;

 WriteLn ('Сумма чисел кратных 3 = ', s);

 ReadLn

end.

0,0(0 оценок)
Ответ:
Povelitel2004
Povelitel2004
24.02.2021 20:08

Эргономика (от греческого ergon – «работа», no-mos – «закон» или «закон работы») – это область знаний, которая комплексно изучает трудовую деятельность человека в системе «человек – техника – среда» с целью обеспечения эффективности, безопасности и комфорта трудовой деятельности. Поэтому исследования эргономики базируются на определении закономерностей психических и физиологических процессов, которые лежат в основе определенных видов трудовой деятельности, изучающие особенности взаимодействия человека с орудием и предметами труда.

Первые предпосылки развития новой науки о труде были положены в 1857 г. и основаны на изучении закономерности науки о природе, предложенной Войте-хом Ястшембовским.

Возникновению эргономики проблемы, связанные с внедрением и эксплуатацией новой техники и технологий в ХХ в., а именно рост травматизма на производстве, текучесть кадров и т. д., так как научно-технический прогресс начал набирать обороты и это требовало нового объединения наук при активном привлечении психологии, гигиены и многого другого.

Современная эргономика выступает как интегральная наука о трудовой деятельности, которая позволяет повысить трудовую эффективность путем оптимизации условий труда и всех процессов, с ним связанных. Под эффективностью труда в данном случае выступает не только высокая производительность труда, но и положительное влияние на личность рабочего, удовлетворенность своим трудом. Данные, полученные с эргономики используются при разработке рекомендаций в системе научной организации труда. Эргономика решает задачи оптимизации трудовой деятельности охране труда, обеспечивая его гигиену и безопасность труда. И если гигиена труда в эргономике организуется на основе требований физиологии и медицины, то эргономический аспект безопасности труда решается главным образом при непосредственном вмешательстве психологии. Нужно отметить, что эргономика занимается не только усовершенствованием условий труда при существующей технике, но и разработкой рекомендаций по проектированию новой техники и новой организации труда с позиций требований этой науки. Исходя из психологических, гигиенических и прочих условий труда, она вырабатывает соответствующие требования к технике, в том числе и к техническим средствам безопасности труда.

Современная эргономика исследует не только усовершенствование условий труда при существующей технической оснащенности, но и разработку рекомендаций новой организации труда с позиций требований этой науки.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота