Арифметический цикл Опции

[polic]

значит надо возвести в (-1)степень i воспользовался FAQ выдаёт ошибку что преобразование типа bolean в byte
запрещено

[volvo]

Чего запрещено? Boolean в Byte? С каких это пор, если это ЯВНОЕ приведение типов? Размер типов одинаковый, что хочу с ними то и делаю...

А ты читай букварь, как ВЫЗЫВАТЬ функции... То, что ты понаписал - ни один компилятор даже в бреду себе представить не мог...

[klem4]

Да и вообще не нужно тебе м инус единицу возводить никуда, у тебя знакопеременный ряд, смотри вот пример как с ним работать: Ещё задачка

[мисс_граффити]

 Function minusOnePower(i: Integer): Integer

класс!
ты можешь посчитать, чему равен integer в квадрате?
чему равен синус от real?
...а от компилятора требуешь.

[polic]

М

По моему смеяться не тебе нужно ... Бессмысленный флуд до добра еще никого не доводил.

Сообщение отредактировано: klem4 - 24.12.2006 18:46

[polic]

это истерический смех я посмотрел ту задачу не могу сообразить как мне записать свой как всётаки предствить -1 в своей задачи или както по другому сделать?

[klem4]

или както по другому сделать?

Нда ... см. пост №3

[polic]

Код

program chiclihescie;
var S,V,S1,B,A,X:real;n,m,i:integer;
begin
writeln ('vvedite A,B,N,M,X');
readln   ( A,B,N,M,X);
S1:=A+B*V;
S:=S+S1;
begin
for I:=m to n do
if ODD(N)
then v:=(A+X*i)/(B+X*i);
if odd(n)
then v:=-v;
end;
end.

откапал в какомто справочнике , товарищи модераторы я правильно сделал?

[мисс_граффити]

теперь смотри, что произойдет.
сначала v равно неизвестно чему (с высокой степенью вероятность 0)
ты считаешь

S1:=A+B*V;

скорее всего, получаешь А

много раз высчитываешь в цикле v (считаешь его каждый раз или не считаешь ни разу в зависимости от четности n)

for I:=m to n do
if ODD(N) then 
  v:=(A+X*i)/(B+X*i);

выходишь из цикла с последним значением v и в зависимость от четности n (опять же!) иногда меняешь знак.

А теперь объясни, в чем смысл этих шаманских действий? В S1 по-прежнему осталось А (а может, и не А)
В S вообще неизвестно что (вероятно - тоже А).

Не знаю, в каких справочниках ты копался, но лучше бы почитал FAQ и инфу по ссылкам, которые тебе дали.

[polic]

мисс графити мож исправиш сама работу горит ведь не знаю как сделать фак читал чото я уже намудрил неполучилось

[polic]

если никто не хочет помоч тк и напишите чтоб не ждал

[Michael_Rybak]

если никто не хочет помоч

Это сколько надо было мисс_граффити печатать вот это:

теперь смотри, что произойдет.
сначала v равно неизвестно чему (с высокой степенью вероятность 0)
ты считаешь

S1:=A+B*V;


скорее всего, получаешь А

много раз высчитываешь в цикле v (считаешь его каждый раз или не считаешь ни разу в зависимости от четности n)

for I:=m to n do
if ODD(N) then
v:=(A+X*i)/(B+X*i);


выходишь из цикла с последним значением v и в зависимость от четности n (опять же!) иногда меняешь знак.

А теперь объясни, в чем смысл этих шаманских действий? В S1 по-прежнему осталось А (а может, и не А)
В S вообще неизвестно что (вероятно - тоже А).

Не знаю, в каких справочниках ты копался, но лучше бы почитал FAQ и инфу по ссылкам, которые тебе дали.

чтобы оказалось, что никто не хочет помочь? Может быть, для успешной помощи не хватает обоюдного желания?

[polic]

что значит

скорее всего, получаешь А

почему?

ну а если поменять местами?

[мисс_граффити]

блин, у меня у самой зачетная неделя!
завтра по инязу зачет, а у меня половина перевода не набрана.
может, наберешь?
горит ведь.

почему?

S1:=A+B*V;
чему равно при V=0?

[polic]

у мя тож зачётная неделя если здам то... во такто правильно?

[мисс_граффити]

неправильно.
почему у тебя знак v определяется четностью n?
причем меняется один раз, уже после цикла.
наверное, некоторые операторы надо все-таки внутрь цикла засунуть, тебе не кажется?

[polic]

наверное, некоторые операторы надо все-таки внутрь цикла засунуть, тебе не кажется?

хорошо засунул в цикл операторы

почему у тебя знак v определяется четностью n?

ну потомучто мы умножаем v на -1 в степень n , а -1 в степени n это либо -1 либо 1

причем меняется один раз, уже после цикла.

стёр

[polic]

вроде поправил

чоещё поправить?

[Гость]

посоветуйте чо изменить ещё чтоб было правильно

[polic]

это я написалпросто забыл активировать ник