Re[2]: Арифметическая прогрессия
От: seug  
Дата: 29.11.02 11:12
Оценка:
UgN>3. Запоминаешь наименьшую по модулю разность между двумя соседними числами Diff
UgN>
UgN>if (CurDiff < Diff) Diff = CurDiff;
UgN>

В этом месте надо считать не минимальную разность 2 соседних чесел, а первого и последующих.

UgN>4. Запоминаешь количество чисел в файле. Cnt

UgN>
UgN>Cnt++
UgN>

А так же сумму всех чисел

Sum += Value;


А потом проверяем
if (((Max-Min)/(Cnt-1) != Diff) return false;
if (Min*Cnt + Diff*Cnt*(Cnt-1)/2 != Sum) return false;
return true;
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.