Сумма ряда

@vincent007 · Регистрация: 09.03.2011

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

Здравствуйте. Как можно построить график суммы такого ряда?
Самое интересное, что z изменяется с шагом 1, а t - с шагом 0,1. Как это можно реализовать?
Остальные параметры вводятся с клавиатуры.

@Puporev · 15.03.2012, 14:29

Вводим значения констант A,ф,c.
Вводим значение n это значит что будем считать сумму от z=1 до z=n
хотя начальное значение z у Вас не указано, может и от 0.
Выбираем интервал по t, например от -2 до 2.
в каждой точке с интервалом 0,1 вычисляем значение суммы по формуле
откладываем по горизонтальной оси значение t, по верткальной U(t.

@vincent007 · 15.03.2012, 14:34 **[ТС]**

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

Вводим значения констант A,ф,c.
Вводим значение n это значит что будем считать сумму от z=1 до z=n
хотя начальное значение z у Вас не указано, может и от 0.
Выбираем интервал по t, например от -2 до 2.
в каждой точке с интервалом 0,1 вычисляем значение суммы по формуле
откладываем по горизонтальной оси значение t, по верткальной U(t.

То есть такой ряд реально построить? Интервал t и z одинаковый. Разница в том, что шаг у z=1, а у t=0.1. Как мне написать это? Через цикл?

@Puporev · 15.03.2012, 14:38

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

Через цикл?

Да.

Delphi
1
2
3
4
5
6
7
8
9
t:=tn;
while t<=tk do
 begin
  u:=0;
  for z:=zn do zk do
  u:=u+вычисленное значение по формуле
  Chart1.Series[0].AddXY(t,u,'',clRed);
  t:=t+0.1;
 end;

@vincent007 · 15.03.2012, 14:44 **[ТС]**

Попробую. Отпишусь, получилось или нет! Но заранее спасибо.

@vincent007 · 19.03.2012, 12:37 **[ТС]**

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
   t:=0;
   z:=0;
   K:=n*pi*m;
   Cht3.Series[0].Clear;
   while (t<K) do
      begin
        sum:=0;
 
        for z:=0 to K do
        sum:=sum+y3(A,z,n,phi,t);
        Cht3.Series[0].AddXY(t,sum);
        t:=t+0.1;
        z:=z+1;
 
      end;

Выдает ошибку
For loop control variable must be simple local variable

@Puporev · 19.03.2012, 12:46

переменная z не должна быть глобальной, а объявлена в процедуре
например

Delphi
1
2
3
procedure TForm1.Button1Click(Sender: TObject);
var z:integer;
begin

@vincent007 · 19.03.2012, 13:01 **[ТС]**

все равно выдает( посмотрите пожалуйста, что не так.

@Puporev · 19.03.2012, 13:23

А где .pas файл? Unit1.pas

@vincent007 · 19.03.2012, 13:30 **[ТС]**

Добавил.

@Puporev · 19.03.2012, 13:49

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

for z:=0 to K do

z должна быть целого типа, это счетчик цикла for.
И почему считаете до К? Обычно считают до какого-то целого числа.

Добавлено через 7 минут
Формула, которую Вы привели в начале совсем не такая как в программе, да и все остальные формулы нужно проверять, не зная ни сути ни формул, никто вам не поможет.

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@vincent007 0 / 0 / 0 Регистрация: 09.03.2011 Сообщений: 26

	Сумма ряда 15.03.2012, 11:53. Показов 1123. Ответов 10 Метки нет (Все метки) Здравствуйте. Как можно построить график суммы такого ряда? Самое интересное, что z изменяется с шагом 1, а t - с шагом 0,1. Как это можно реализовать? Остальные параметры вводятся с клавиатуры. Миниатюры 0

@Puporev Почетный модератор 64319 / 47615 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	15.03.2012, 14:29
	Вводим значения констант A,ф,c. Вводим значение n это значит что будем считать сумму от z=1 до z=n хотя начальное значение z у Вас не указано, может и от 0. Выбираем интервал по t, например от -2 до 2. в каждой точке с интервалом 0,1 вычисляем значение суммы по формуле откладываем по горизонтальной оси значение t, по верткальной U(t. 0

@vincent007 0 / 0 / 0 Регистрация: 09.03.2011 Сообщений: 26
	15.03.2012, 14:44 [ТС]
	Попробую. Отпишусь, получилось или нет! Но заранее спасибо. 0

@Puporev Почетный модератор 64319 / 47615 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	19.03.2012, 13:23
	А где .pas файл? Unit1.pas 0