Табулирование функции и ее разложения в сумму ряда

@Sepirock · Регистрация: 07.08.2020

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

Помогите написать программу, пожалуйста!.

Табулирование функции и ее разложения в сумму ряда:

Сумма S	Изменения x	n	Функция Y
$https://www.cyberforum.ru/cgi-bin/latex.cgi?\cos x+\frac{\cos 3x}{9}+\frac{\cos 5x}{25}+\,\cdots$	$https://www.cyberforum.ru/cgi-bin/latex.cgi?[\pi /5;\,\pi ]$	40	$https://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{\pi ^2}{8}-\frac{\pi }{4}\mid x \mid$

а это пример решения

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
25
26
27
28
29
30
31
32
program lab4;
const n=10;
      h=0.05;
var i:byte;
    x,y,s,slag:real;
Begin
  writeln;
  writeln('       Автор - Иванов И.П., студент гр. ИСЭд-11');
  writeln('       Вариант № 100');
  writeln(' Программа табулирования функции y=3^x, а также суммы ряда ');
  writeln('       ln(x)    ln(x)^2            ln(x)^n ');
  writeln('s= 1 + -----x + -------x^2 + ... + -------x^n');
  writeln('         1!       2!                  n!');
  writeln('На отрезке [0.1;1] с шагом 0.05');
  writeln;
  writeln ('!    x     !    y     !     s    !');
  x:=0;
  while x<1+h do
  begin
    y:=exp(x*ln(3));
    s:=1;    {Начальное значние суммы, включая нулевое слагаемое}
    slag:=1; {Значение нулевого слагаемого}
    for i:=1 to n do
    begin
      slag:= slag*ln(3)/i*x;
      s:=s+slag;
    end;
    writeln('!', x:7:2,'   !',y:7:3,'   !',s:7:3,'   !');
    x:=x+h;
  end;
  readln;
end.

@Cyborg Drone · 07.03.2022, 22:13

Sepirock, при регистрации на форуме Вы обещали соблюдать правила форума. Пожалуйста, выполняйте Ваше обещание. Ссылка на правила есть на любой странице форма.

Фотографии текста заменены текстом.

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

В следующий раз я не стану исправлять Вашу тему, а буду действовать согласно упомянутых правил.

Добавлено через 9 минут
Вы забыли указать шаг.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .

@Cyborg Drone Модератор 10434 / 5722 / 3405 Регистрация: 17.08.2012 Сообщений: 17,412
	07.03.2022, 22:13
	Sepirock, при регистрации на форуме Вы обещали соблюдать правила форума. Пожалуйста, выполняйте Ваше обещание. Ссылка на правила есть на любой странице форма. Фотографии текста заменены текстом. В первую очередь, уважительно относитесь к участникам форума. Вы выложили фотографию образца программы. Вы вынуждаете того, кто вдруг пожелает Вам помочь, перепечатывать текст образца прогаммы с Вашей фотографии вручную, вместо того, чтобы просто скопировать текст. В следующий раз я не стану исправлять Вашу тему, а буду действовать согласно упомянутых правил. Добавлено через 9 минут Вы забыли указать шаг. 0