Формула суммы ряда чисел в Паскале

@mozg777 · Регистрация: 21.05.2014

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста. Не могу задать формулу в Паскале.
s=x*cos(180/3)/1 - x^2*cos(2*180/3)/2 + ... + x^n*cos(n*180/3)/n + ....

Добавлено через 1 час 55 минут
Еще подскажите пожалуйста как задать точность погрешности e=10^(-4) и посчитать количество членов вошедших в сумму

@JokeR.BY · 22.05.2014, 04:02

Pascal

uses
  Crt;
  
var
  x, powX, s : Double;
  n, i : Byte;
 
begin
  Write('Input n='); ReadLn(n);
  Write('Input x='); ReadLn(x);
  s := 0; powX := 1;
  for i := 1 to n do
  begin
    powX := powX * x;
    s := s + powX * cos(i * 180 / 3) / i;
  end;
  WriteLn('s=', s:3:3);
  ReadLn;
end.

это что касательно самой формулы

@mozg777 · 22.05.2014, 06:58 **[ТС]**

Спасибо большое ! Я и не думал , что это именно так выглядит)

@JokeR.BY · 22.05.2014, 07:07

mozg777, маленькое уточнение: там минус - опечатка? или там (-1)^(i-1) ?
если всё же второе, то:

Pascal

1 2	powX := -1; //в 11 строке powX := powX * x * (-1); //в 14 строке

@mozg777 · 22.05.2014, 17:27 **[ТС]**

Точно. Вы правы. Не может же в сумме бесконечного ряде быть отрицательного члена, если первый член положительный и последующий n член тоже положительный.

@Cyborg Drone · 26.05.2014, 15:27

Сообщение от mozg777

Не может же в сумме бесконечного ряде быть отрицательного члена, если первый член положительный и последующий n член тоже положительный.

Это почему же? Разберитесь, какой из рядов Вам нужен, возможно, у Вас опечатка в задании:

$https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\sum_{i=1}^{\infty}\frac{x^n \cos\left( \frac{180\cdot n}{3}\right)}{n}$

или

$https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\sum_{i=1}^{\infty}\frac{(-1)^{i-1}x^n \cos\left( \frac{180\cdot n}{3}\right)}{n}$

@mozg777 · 29.05.2014, 17:14 **[ТС]**

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

Добавлено через 2 минуты
И как сделать,я так и не понял: код формулы , написанный добрым человеком, у меня не работает по неизвестной мне причине

@Cyborg Drone · 29.05.2014, 20:34

Код рабочий, проверено.

Новые блоги и статьи
Распознавание изображений (компьютерное зрение) на C++ InfoMaster 20.01.2025 Введение в компьютерное зрение и основы работы с изображениями Компьютерное зрение представляет собой одну из наиболее динамично развивающихся областей информационных технологий, позволяющую. . .	Какой язык программирования лучший для разработки нейронных сетей InfoMaster 20.01.2025 В современном мире технологий искусственные нейронные сети становятся неотъемлемой частью множества инновационных решений, от распознавания речи до автоматического управления транспортными. . .	Как подключить JavaScript файл в другом JavaScript файле InfoMaster 20.01.2025 В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .	Как откатить изменения в исходниках, не внесенные в Git InfoMaster 20.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .	В чем разница между px, in, mm, pt, dip, dp, sp InfoMaster 20.01.2025 В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .	Как изменить адрес удалённого репозитория (origin) в Git InfoMaster 20.01.2025 В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
Как переместить последние коммиты в новую ветку (branch) в Git InfoMaster 20.01.2025 При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .	Как вернуть результат из асинхронной функции в JavaScript InfoMaster 20.01.2025 Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .	Какой локальный веб-сервер выбрать InfoMaster 19.01.2025 В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .	Почему планшеты и iPad уже не так популярны, как раньше InfoMaster 19.01.2025 Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .	Как самому прошить BIOS ноутбука InfoMaster 19.01.2025 BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .	Какой Linux выбрать для домашнего компьютера InfoMaster 19.01.2025 Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .

@mozg777 0 / 0 / 0 Регистрация: 21.05.2014 Сообщений: 4
		1
	Формула суммы ряда чисел в Паскале 21.05.2014, 20:38. Показов 1932. Ответов 7 Метки нет (Все метки) Помогите пожалуйста. Не могу задать формулу в Паскале. s=xcos(180/3)/1 - x^2cos(2180/3)/2 + ... + x^ncos(n180/3)/n + .... Добавлено через 1 час 55 минут* Еще подскажите пожалуйста как задать точность погрешности e=10^(-4) и посчитать количество членов вошедших в сумму 0

@mozg777 0 / 0 / 0 Регистрация: 21.05.2014 Сообщений: 4
	22.05.2014, 06:58 [ТС]	3
	Спасибо большое ! Я и не думал , что это именно так выглядит) 0

@mozg777 0 / 0 / 0 Регистрация: 21.05.2014 Сообщений: 4
	22.05.2014, 17:27 [ТС]	5
	Точно. Вы правы. Не может же в сумме бесконечного ряде быть отрицательного члена, если первый член положительный и последующий n член тоже положительный. 0

@Cyborg Drone Модератор 10074 / 5415 / 3356 Регистрация: 17.08.2012 Сообщений: 16,578
	26.05.2014, 15:27	6
	Сообщение от mozg777 Не может же в сумме бесконечного ряде быть отрицательного члена, если первый член положительный и последующий n член тоже положительный. Это почему же? Разберитесь, какой из рядов Вам нужен, возможно, у Вас опечатка в задании: $https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\sum_{i=1}^{\infty}\frac{x^n \cos\left( \frac{180\cdot n}{3}\right)}{n}$ или $https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\sum_{i=1}^{\infty}\frac{(-1)^{i-1}x^n \cos\left( \frac{180\cdot n}{3}\right)}{n}$ 0

@mozg777 0 / 0 / 0 Регистрация: 21.05.2014 Сообщений: 4
	29.05.2014, 17:14 [ТС]	7
	Я согласен, что ошибка возможна, но я все-таки склоняюсь к положительному бесконечному ряду чисел Добавлено через 2 минуты И как сделать,я так и не понял: код формулы , написанный добрым человеком, у меня не работает по неизвестной мне причине 0

@Cyborg Drone Модератор 10074 / 5415 / 3356 Регистрация: 17.08.2012 Сообщений: 16,578
	29.05.2014, 20:34	8
	Код рабочий, проверено. 0