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

О каком факторе риска идёт речь? а. Повышенная температура в помещении — это... психоэмоциональный фактор физически-эргономический фактор фактор риска травмы физический фактор б. Физическая перегрузка — это... физический фактор фактор риска травмы физически-эргономический фактор психоэмоциональный фактор

Показать ответ
Ответ:
wasgf
wasgf
13.01.2023 17:23

#include <iostream>

#include <vector>

using namespace std;

#define ll long long

#define ld long double

signed main(){

   ll n,m;

   cin >> n >> m;

   vector<pair<ll,ll>> v;

   ll cur_min = LLONG_MAX;

   for(ll i = 0; i < n; i++)

       for(ll j = 0; j < m; j++){

           ll x;

           cin >> x;

           if(x < cur_min){

               v.clear();

               v.push_back({i,j});

               cur_min = x;

           }

           else if(x == cur_min)

               v.push_back({i,j});

       }

   for(auto i: v)

       cout << i.first << " " << i.second << "\n";

}

0,0(0 оценок)
Ответ:
jahongir21
jahongir21
23.04.2021 13:43

1)

var i, S, N: integer;

begin

 writeln('Введите N:');

 readln(N);

 repeat

 if i mod 2=0 then S:=S+i;;

 inc(i)

 until i>n;

 writeln('Сумма всех четных чисел 1 до ',N,' равна: ',S);

 readln;

End.

2)

var i, S, N: integer;

begin

 writeln('Введите N:');

 readln(N);

 while i<=N do

 begin

   if i mod 2=0 then S:=S+i;

   i:=i+1;

 end;

 writeln('Сумма всех четных чисел 1 до ',N,' равна: ',S);

end.

3)

var i, S, N: integer;

begin

 writeln('Введите N:');

 readln(N);

 for i:=1 to N do

   if i mod 2=0 then S:=S+i;

 writeln('Сумма всех четных чисел 1 до ',N,' равна: ',S);

end.

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