Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.12.2011, 19:54   #1
zenid
Пользователь
 
Регистрация: 25.12.2011
Сообщений: 47
По умолчанию цыклы в pascal

помогите пожалуста с задачей, я вообще не понимаю это задание:

1. Найти сумму ряда с точностью до члена ряда, меньшего (задается с клавиатуры) для заданного значения и сравнить эту сумму с функцией контроля
напишите пожалуйста код программы:
Изображения
Тип файла: jpg сумма ряда.jpg (22.3 Кб, 27 просмотров)

Последний раз редактировалось zenid; 27.12.2011 в 20:01.
zenid вне форума Ответить с цитированием
Старый 27.12.2011, 20:02   #2
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

Код:
uses crt;
var x,an,s,eps,t:real;
   n:longint;
begin
clrscr;
write('x=');readln(x);
write('eps=');readln(eps);
s:=0;t:=x;n:=1;an:=t/n
while abs(an)>=eps do
 begin
  s:=s+an;
  n:=n+1;
  t:=t*(-x);
  an:=t/n;
  end;
writeln('s=',s:0:6);
write('ln(1+x)=',ln(1+x):0:6);
readln
end.
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"
Mad_Cat вне форума Ответить с цитированием
Старый 27.12.2011, 20:06   #3
zenid
Пользователь
 
Регистрация: 25.12.2011
Сообщений: 47
По умолчанию

а что такое eps? и еще скажите пожалуйста что вводить в Х и в EPS?, заранее спасибо.
zenid вне форума Ответить с цитированием
Старый 27.12.2011, 20:08   #4
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

eps - это точность
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"
Mad_Cat вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Цыклы на С++ JustFunBoy Помощь студентам 2 18.01.2011 18:14
Цыклы belik1 Общие вопросы C/C++ 6 02.01.2011 20:21
pascal цыклы lunnamedl Помощь студентам 1 07.12.2009 19:23
Pascal, цыклы, массивы Maks:// Помощь студентам 1 11.03.2009 19:16