Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите пожалуйста...


Настена ©   (2007-04-20 14:50:00) 

Даны натуральные числа n, a1, a2, an. Определить количество членов последовательности a1, a2, an, имеющих четные порядковые номера и являющихся нечетными числами.


iXT   (2007-04-24 15:59:00) [1]

> а то я тупая и ничего не знаю!!!

За что же такая самокретичность?


Настена   (2007-04-24 15:57:00) [2]


> fd979

Привет. Напиши полностью код, а то я тупая и ничего не знаю!!!


sniknik   (2007-04-20 22:27:00) [3]

> А теперь задумайся, глубоко задумайся - помощь ли это и доброе ли это дело.
Хочешь помочь новичку - делай вместе с ним.
Хочешь помочь старику - делай вместо него.
Хочешь помочь мастеру - отойди и не мешай.
А хочешь помочь дураку - сам дурак!
© анекдотная лента


fd979   (2007-04-20 20:24:00) [4]


> А теперь задумайся, глубоко задумайся - помощь ли это и
> доброе ли это дело.

Пол десятого пятницы... спроси чего-нить по легче :)


Johnmen   (2007-04-20 20:14:00) [5]


> fd979 ©   (20.04.07 19:45) [13]
>  почему бы не сделать доброе дело и не помочь студенту.

А теперь задумайся, глубоко задумайся - помощь ли это и доброе ли это дело.

> да и еще потратил на это всего минуту

И кучу минут на постинги сюда...


fd979   (2007-04-20 19:47:00) [6]

да и еще потратил на это всего минуту


fd979   (2007-04-20 19:45:00) [7]


> > Сергей М.
>
> Напиши программу пожалуйста, как она должна выглядеть в
> готовом виде.




> Мы-то злые.
> А вот ты - трижды тупой.
>
> Автор канючил "дай алгоритм", а не "дай код")


А ты четырежды тупой, если не умеешь читать, а главное понять, что человек не знает азов и врядли понимает разницы между алгоритмом и кодом.
А то что я написал злые, ты наверно увидел, что я после поставил :), что означало шутку, на которую нормальные челы не обижаются и не воспринимают в штыки.

Был конец рабочего дня, хорошее настроение, конец недели (намечается пьянка) вот и подумал, почему бы не сделать доброе дело и не помочь студенту. Тем более, что ей придется самой дописывать в плане использования.


Правильный Вася   (2007-04-20 17:06:00) [8]

мдя, зачоты в школе пошли
и ведь находятся странные люди кормящие беспринципных попрошаек


Сергей М.   (2007-04-20 16:55:00) [9]


> Злые вы ребята


Мы-то злые.
А вот ты - трижды тупой.

Автор канючил "дай алгоритм", а не "дай код")


fd979   (2007-04-20 16:51:00) [10]

Злые вы ребята :)

function TForm1.OddCount(A: array of Integer): Integer;
Var
 i, n0, n  : Integer;
begin

 n0 := Low(A);
 n := High(A);
 Result := 0;
 For i := n0 to n do
 begin
   if (i / 2 = i div 2) and (A[i] / 2 <> A[i] div 2) then
     Result := Result + 1;
 end;
end;


Johnmen   (2007-04-20 15:40:00) [11]

Чё-то молчит... Наверное, уже поймала...


Сергей М.   (2007-04-20 15:38:00) [12]


> Настена   (20.04.07 15:27) [6]


Т.е. в виде "экзекухи" ?

Эт запросто)

Готова ? Лови ..


Ega23   (2007-04-20 15:29:00) [13]

Удалено модератором


Настена   (2007-04-20 15:27:00) [14]


> Сергей М.

Напиши программу пожалуйста, как она должна выглядеть в готовом виде.


Сергей М.   (2007-04-20 15:03:00) [15]

для каждого i-го числа из ряда длиной n чисел
начало
 взять из ряда i-е число
 если i четное и само i-e число нечетное то
   число a(i), удовлетворяющее этим условиям, найдено
конец


Ega23   (2007-04-20 15:00:00) [16]

3000 рублей.


Настена   (2007-04-20 14:56:00) [17]


> Написать алгоритм


MBo   (2007-04-20 14:54:00) [18]

Это довольно просто.
Завести СчетчикНечетныхЧиселСтоящихНаЧетныхМестах, инициализировать его нулем.
Нужно пройти всей по последовательности, и для членов с четными номерами проверять, являются ли они нечетными числами. Если да, то увеличивать на единицу СчетчикНечетныхЧиселСтоящихНаЧетныхМестах


Сергей М.   (2007-04-20 14:53:00) [19]

Чем же тебе помочь ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо