IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным. В описании темы указываем язык!!!

 
 Ответить  Открыть новую тему 
> максимальное кол-во чисел..... на C++
Tonny_Bennet
сообщение 18.05.2007 20:30
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 23
Пол: Мужской
Реальное имя: Максим

Репутация: -  0  +


помогите. Дано целое число N и набор из N целых чисел. Найти максимальное количество чётных чисел в наборе идущих подряд, если чётные числа в наборе отсутствуют то вывести 0


--------------------
Мечта женщины - быть женщиной мечты. Э. Севрус
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
klem4
сообщение 18.05.2007 21:06
Сообщение #2


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


#include <iostream.h>
#include <stdlib.h>

int* arr, n;

int main(void) {

cout << "n = "; cin >> n;

arr = new int[n];

srand(time(NULL));

for (int i = 0; i < n; i++) cout << (arr[i] = rand() % 20) << endl;

int max = 0;
for (i = 0; i < n; i++) {
int count = 0;
while ((i < n) && ( arr[i] % 2 == 0)) { count++; i++; }
max = (count > max) ? count : max;
}


if (max == 0) cout << "NO"; else cout << "count = " << max;

delete(arr);
return 0;
}


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Tonny_Bennet
сообщение 20.05.2007 18:01
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 23
Пол: Мужской
Реальное имя: Максим

Репутация: -  0  +


Спасибо за помощь smile.gif))


--------------------
Мечта женщины - быть женщиной мечты. Э. Севрус
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 23.07.2025 22:55
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"