Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Дарьюшка
0 / 0 / 0
Регистрация: 03.02.2012
Сообщений: 56
#1

Найти значение выражения - Turbo Pascal

10.02.2014, 17:31. Просмотров 371. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста решить,если можно с объяснением

Дано вещественное число X и целое число N (>0). Найти значение
выражения
1−X2/(2!) +X4/(4!) − . . . + (−1)N·X2·N/((2·N)!)
(N! = 1·2·. . .·N). Полученное число является приближенным значением
функции cos в точке X.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.02.2014, 17:31
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Найти значение выражения (Turbo Pascal):

Найти значение выражения (2*5!+3*8!) / (6!+4!)
Найти значение выражения (2*5!+3*8!) / (6!+4!) где n! означает факториал...

Найти значение выражения
Где b, N - заданные натуральные значения. \frac{2}{3}(b+1)\cdot...

Найти значение выражения
записать уравнение на языке паскаль y=\frac{\left(-5x^4+8x^2-7...

Найти значение выражения
z=|s|+\prod_{j=6}^{10}(x+s) s={log}_{2}4*x

Найти значение выражения
y=\begin{cases}\prod_{i=9}^{20}\ i^2+i-2 &\ ,\ \ x<1\\\\\\\\\\\\x+e^x &\ ,\ \...

Найти значение выражения
Помогите пожалуйста решить задачу в TurboPascal: Найти значение выражения...

1
Puporev
Модератор
54136 / 41769 / 28880
Регистрация: 18.05.2008
Сообщений: 98,311
10.02.2014, 19:20 #2
Лучший ответ Сообщение было отмечено Дарьюшка как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var x,s,t:real;
   n,i:integer;
begin
clrscr;
write('x=');//значение х-любое число
readln(x);
write('n=');//количество слагаемых,типа n=20
readln(n);
s:=1;//сумма при n=0
t:=1;//значение члена ряда при n=0
for i:=1 to n do //вычисляем n членов ряда
 begin
  t:=-t*x*x/((2*i-1)*(2*i));//меняем знак, домнжаем предыдущее на x^2(x^(2n))
                            //и делим на 2 следующих числа((2n)!)
  s:=s+t; //прибавляем к сумме
 end;
writeln('Сумма=',s:0:4);
write('Cos(x)=',cos(x):0:4);
readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.02.2014, 19:20
Привет! Вот еще темы с решениями:

Найти значение выражения
На практике задание дали, а я прогроммирование только начал изучать и ещё...

Найти значение выражения
Помогите решить http://s58.***********/i161/1102/b3/d766944a0039.jpg

Найти значение выражения
Дана строка, изображающая выражение вида <цифра>+-<цифра>+-<цифра>+-... Напр...

Найти значение выражения
11. Найти значение выражения (2*5!+3*8!) / (6!+4!)


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

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

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