Вопрос по информатике:
Дан массив из 7 элементов. Найти произведение четных чисел и кол-во нечётных
Пожаловаться
- 19.07.2017 13:24
- Информатика
- remove_red_eye 11655
- thumb_up 34
Ответы и объяснения 2
#include
using namespace std;
int main() {
int a[7];
int k = 0, p = 1;
for(int i = 0; i < 7; i++) {
cin >> a[i];
if(a[i] % 2 == 0) p*=a[i];
else k++;
}
cout << "Произведение: " << p << endl << "Количество: " << k << endl;
}
using namespace std;
int main() {
int a[7];
int k = 0, p = 1;
for(int i = 0; i < 7; i++) {
cin >> a[i];
if(a[i] % 2 == 0) p*=a[i];
else k++;
}
cout << "Произведение: " << p << endl << "Количество: " << k << endl;
}
Пожаловаться
- 20.07.2017 02:22
- thumb_up 14
// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger(7);
Write('Произведение четных: ',
a.Where(x->x.IsEven).Aggregate(1.0,(x,y)->x*y),
', количество нечетных: ',a.Where(x->x.IsOdd).Count)
end.
Пример
-15 8 42 11 95 118 -27
Произведение четных: 39648, количество нечетных: 4
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger(7);
Write('Произведение четных: ',
a.Where(x->x.IsEven).Aggregate(1.0,(x,y)->x*y),
', количество нечетных: ',a.Where(x->x.IsOdd).Count)
end.
Пример
-15 8 42 11 95 118 -27
Произведение четных: 39648, количество нечетных: 4
Пожаловаться
- 21.07.2017 06:06
- thumb_up 2
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы