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

(ответ пишет тот, кто знает.)

Дан массив, содержащий 40 целых чисел в диапазоне от -10000 до 10000. Напишите на одном из языков
программирования программу, которая находит в этом массиве количество пар соседних элементов массива, произведение которых нечётно, а сумма – положительна. В данной задаче под парой
подразумеваются два соседних элемента массива.
Исходные данные объявлены так, как показано ниже. Запрещается использовать
переменные, не описанные ниже, но разрешается не использовать некоторые
из описанных переменных.
В качестве ответа Вам необходимо привести фрагмент программы, который
должен находиться на месте многоточия.

var
a: array [0..39] of integer;
i, j, k: integer;
begin
for i := 0 to 39 do readln(a[i]);
...
end.

Показать ответ
Ответ:
CHEREPOK17
CHEREPOK17
23.08.2020 22:56

#include <iostream>

#include <cmath>

#include <vector>

using namespace std;

signed main() {

 int a[40];

 for(int i = 0; i < 40; i++)

     cin >> a[i];

 int k = 0;

 for(int i = 0; i < 39; i++)

     if((a[i] * a[i+1]) % 2 == 1 && a[i] + a[i+1] > 0)

         k++;

 cout << k;    

}

0,0(0 оценок)
Ответ:
merit6052
merit6052
23.08.2020 22:56

#include <iostream>

using namespace std;

int main()

{

   int i,j,k;

   int a[40];

   for (int i=0; i<40; i++)

   {

       cin>>a[i];

   }

   k=0;

   for (int i=0; i<39; i++)

   {   j=a[i]*a[i+1];

       if(j % 2 == 1)

       {   j=a[i]+a[i+1];

           if(j > 0)

               k++;

       }

   }

   

   cout<<k<<endl;

   

   return 0;

}

Объяснение:

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