[ЮркаСал]

Дано натуральное n. Вычислить: y =1*3*5x...x(2n-1). Спасибо!

[ART]

Ммм, дай подумать... 500 р.

[Rokuell]

Ммм, сделаю за 400 р.

[shaman]

Ммм, думаю за 350 договоримся

[PhoeniX]

270 мой предлог!

[PhoeniX]

А по делу, прекратим флуд. Может, у чела просто проблемы с алгеброй 8-9 класса...

Сообщение от ЮркаСал

y =1*3*5x...x(2n-1)

Я так понимаю, формула не полная... смущает многоточие...
Стучись в 488341189.

ЗЫ: От сообщений, типо "нет тя в аське" - я в ней постоянно. Добавьте в контакты и НАПИШИТЕ что-нибудь. Я авторизую, и БЕЛЫЙ цветок сменится на ЗЕЛЁНЫЙ.

[Rokuell]

Похоже у чела просто отсутствует привычка думать (судя по его вопросам).
А формула нормальная, это произведение первых n нечётных чисел.

Код:

function Calc(n:integer):integer;
var i:integer;
begin
 Result := 1;
 for i:=2 to n do Result := Result * ( 2*i - 1 );
end;

[PhoeniX]

а, дошло))

[ЮркаСал]

Сообщение от popyurv

а, дошло))

Все равно у меня програмка не работает, делаю так как все написано выше! Показывает какую то ошибку!

[moo2k]

А вот мой вариант реализации...
P.S. Компилировал на D2009. Полностью рабочий.