|
#1
|
|||
|
|||
Задча на Delphi7
Дано натуральное n. Вычислить: y =1*3*5x...x(2n-1). Спасибо!
|
#2
|
|||
|
|||
Ммм, дай подумать... 500 р.
|
#3
|
||||
|
||||
Ммм, сделаю за 400 р.
Велик и могуч наш Object Pascal ! ICQ: 357-591-887 |
#4
|
|||
|
|||
Ммм, думаю за 350 договоримся
|
#5
|
||||
|
||||
270 мой предлог!
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#6
|
||||
|
||||
А по делу, прекратим флуд. Может, у чела просто проблемы с алгеброй 8-9 класса...
Цитата:
Стучись в 488341189. ЗЫ: От сообщений, типо "нет тя в аське" - я в ней постоянно. Добавьте в контакты и НАПИШИТЕ что-нибудь. Я авторизую, и БЕЛЫЙ цветок сменится на ЗЕЛЁНЫЙ. Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#7
|
||||
|
||||
Похоже у чела просто отсутствует привычка думать (судя по его вопросам).
А формула нормальная, это произведение первых n нечётных чисел. Код:
function Calc(n:integer):integer; var i:integer; begin Result := 1; for i:=2 to n do Result := Result * ( 2*i - 1 ); end; Велик и могуч наш Object Pascal ! ICQ: 357-591-887 |
#8
|
||||
|
||||
а, дошло))
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#9
|
|||
|
|||
Цитата:
|
#10
|
||||
|
||||
А вот мой вариант реализации...
P.S. Компилировал на D2009. Полностью рабочий. Программирование - это искусство и наш смысл жизни. Последний раз редактировалось moo2k, 03.05.2009 в 15:07. |