Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
91111111111
1 / 1 / 1
Регистрация: 07.11.2012
Сообщений: 52
1

Не используя стандартные функции вычислить выражение

04.01.2014, 15:42. Просмотров 1076. Ответов 3
Метки нет (Все метки)

Не используя стандартные функции вычислить выражение
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.01.2014, 15:42
Ответы с готовыми решениями:

Не используя стандартные функции вычислить выражение
Здравствуйте, поможете с задачей? Не используя стандартные функции (за...

Вычислить, не используя стандартные функции LN(x) и EXP(x) 2^n, n - натуральное число;
Вычислить, не используя стандартные функции LN(x) и EXP(x) 2^n, n - натуральное...

Не используя стандартные функции (за исключением ABS), вычислить с точностью e>0
shx = x + x^3/3! + x^5/5! + ... + x^(2n+1)/(2n+1)! + ... Считать, что...

Не используя стандартные функции (за исключением abc), вычислить сумму ряда с задонной точностью E>0
Помогите написать программу:):):) Не используя стандартные функции (за...

Вычислить, используя рекурсию, выражение
Вычислить, используя рекурсию, выражение

3
ildwine
04.01.2014, 19:59
  #2
 Комментарий модератора 
91111111111, текст задания нужно перепечатывать в пост! Для формул есть редактор. В крайнем случае - картинкой вставить только формулу!
0
91111111111
1 / 1 / 1
Регистрация: 07.11.2012
Сообщений: 52
04.01.2014, 20:00  [ТС] 3
понял извините
0
Puporev
Модератор
54584 / 42090 / 29061
Регистрация: 18.05.2008
Сообщений: 99,289
05.01.2014, 09:27 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Вычислить суму ряда можно так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses crt;
var x,e,t,y:real;
    n,k:integer;
begin
clrscr;
e:=0.0001;
repeat
write('x>=0 x=');
readln(x);
until x>=0;
t:=x;
n:=1;
k:=3;
y:=t/k;
while abs(t)/k>e do
 begin
  n:=n+1;
  k:=k+4;
  t:=-t*x*x/((2*n-2)*(2*n-1));
  y:=y+t/k
 end;
writeln('Y=',y:0:4);
readln
end.
А по какой стандартной функции найти значение интеграла в левой части я понятия не имею.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.01.2014, 09:27

Используя рекурсию, вычислить выражение с заданной точностью ε>0
ПАСКАЛЬ!Используя рекурсию, вычислить с заданной точностью ε>0

Используя функцию поиска наименьшего из двух чисел, вычислить выражение
используя функцию поиска наибольшего(наименьшего) из двух чисел составить...

Используя функцию поиска наибольшего из двух чисел, вычислить выражение
используя функцию поиска наибольшего(наименьшего) из двух чисел составить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru