Вопрос № 70466: Здраствуйте Вы можете мне помочь в решении одной задачки на Паскале
Задано последовательность из N чисел а(1), а(2), а(3)....а(N)
Найти разницу между суммой парных чисел и суммой непарных чисел
Буду очень благодарен!!...
Вопрос № 70.466
Здраствуйте Вы можете мне помочь в решении одной задачки на Паскале
Задано последовательность из N чисел а(1), а(2), а(3)....а(N)
Найти разницу между суммой парных чисел и суммой непарных чисел
Буду очень благодарен!!
Отвечает: Tek
Здравствуйте, Шутяк Роман Викторович !
Если имеется в виду - парные числа - те, которые повторяются в массиве, то имеет смысл для каждого элемента выяснить имеет ли он "братьев" а затем добавить к той или другой сумме, примерно так:
sumpar:=0;
sum:=0;
for i:=1 to N do
begin
flagpar:=false;
{здесь как раз и проверям равен ли элемент еще какому-нибудь, кроме самого себя}
for j:=1 to N do
if i<>j and a[i]=a[j] then flagper=true;
{относим его к соответсвующей сумме}
if flagpar=true then
sumpar := sumpar+a[i]
else
sum := sum+a[i];
--------- WinApi - жутко неудобные костыли, MFC и VCL - немногим полезнее, но ничего лучше еще не создано (C)Почти Уинстон Черчилль :)
Ответ отправил: Tek (статус: 6-ой класс)
Ответ отправлен: 11.01.2007, 14:09
Отправить вопрос экспертам этой рассылки
Приложение (если необходимо):
* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.
Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.
Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.
