Помощь - Поиск - Пользователи - Календарь
Полная версия: помогите написать уравнение
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
maks123
Помогите пожалуйста составить уравнение....
...а также поскажите как потом перейти к while и repeat...
....очень прошу ....последняя надежда остаться в универе...
-(1+x)^2+((1+x)^4)/2-((1+x)^6)/3+...+((1+x)^20)/10;
x= -0.15

Добавлено через 11 мин.
помогите ....срочно....завтра последний день сдачи
Krjuger
Ну это сугубо ваши проблемы,что вы в последний день вдруг спохватились.Для начала и While и repeat-это два разных цикла.Во вторых,в вашей формуле неизвестно где расставлены закрывающие скобочки,гадать тут врятли будут.И наконец,чтобы показать,что вы пытались самостоятельно решить задачу,покажите то,что у вас получилось.
IUnknown
Цитата
Во вторых,в вашей формуле неизвестно где расставлены закрывающие скобочки,гадать тут врятли будут
А что не так с закрывающими скобками? Они вроде все на местах.

Цитата
Помогите пожалуйста составить уравнение....
Уравнение чего? Задача состоит в нахождении суммы ряда, так? Вот и надо заниматься нахождением суммы, а не составлением какого-то непонятного уравнения. А уж как находить сумму ряда (пошагово) - об этом на форуме не раз и не десять, и даже не 100 раз было написано. Что, даже поиском воспользоваться времени нет? Ну, тогда у меня тоже нет времени еще раз объяснять это.
maks123
искать на форуме??...

Добавлено через 5 мин.
подскажите где искать..пожалуйста....или ссылку дайте-в крайний случай(((
maks123
var
n:integer;
summ,an,x:real;
begin
writeln('n') ;
write('x');
readln(n);
an:=(exp(n*ln(-1))*exp(2*n*ln(1+x)))/n;
x:=0.15;
summ:=0;
for n:=1 to 10 do
begin
summ:=summ+an;
writeln('summ,an');
end;
write('an',summ:6:4);
readln;
end.

Добавлено через 3 мин.
помогите...опять чушь какая то получается......ничего не могу поделать.....администраторы ..загляните плиз...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.