Задачи поиска последовательностей

Задача 1.
Дан массив из 0 и 1. Посчитать длину самой длинной последовательности 1.
mas[ 1,0,0,1 ,1,0 ,0,1,1,1]
ответ: 3

Решение
const int N = 6;
main()
{
int i,m[N];
int len=0,maxlen=0;
for (i=0;i
{
cin>>m[i];
if (m[i]==1)
{
len++;
if (len>maxlen)
{
maxlen=len;
}
}
else
{
len=0;
}
}
cout<<("Dlina posled-ti = ",maxlen);
}

Задача 2.
Дан целочисленный массив. Посчитать длину самой длинной последовательности одинаковых элементов.
mas[ 10,10,5,1 ,6,0 ,3,3,3,1]
ответ: 3

Решение
const int N = 6; main()
{
int i,m[N];
int len=1,maxlen=1;
{Заполнение и вывод массива}
for (i=0;i
{
if (m[i]==m[i+1])
{
len++;
if (len>maxlen)
{
maxlen=len;
}
}
else
{
len=1;
}
}
cout<<("Dlina posled-ti =",maxlen);
}