Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Строка символов до точки https://www.cyberforum.ru/ turbo-pascal/ thread1105325.html
Дана строка символов до точки. Определить, является ли она правильным скобочным выражением. Рассматривать только круглые скобки. На экран вывести исходную строку и результаты с соответствующими...
Вычислить дату следующего дня Turbo Pascal
Написать программу, которая вычисляет дату следующего дня. Ниже представлен рекомендуемый вид экрана во время работы программы(данные, введенные пользователем, выделены полужирном цветом) Введите...
Turbo Pascal Напечатать строку, предварительно преобразовав ее следующим образом: удалить все вложения th https://www.cyberforum.ru/ turbo-pascal/ thread1105307.html
помогите решить,заранее спасибо!
Turbo Pascal Подсчитать количество элементов с одинаковыми порядковыми номерами https://www.cyberforum.ru/ turbo-pascal/ thread1105277.html
Используя нетипизированный параметр в подпрограмме, в строке и в векторе из 10 компонентов подсчитать количество элементов с одинаковыми порядковыми номерами.
Определить минимальный элемент в каждой строке матрицы и сформировать из них массив Turbo Pascal
Здравствуйте, форумчане. Задание: определить минимальный элемент в каждой строке и сформировать из них массив, определить произведение элементов этого массива. Скрины программы: Ссылки...
Turbo Pascal Вычислить площадь и периметр прямоугольника Даны 2 стороны прямоугольника. Вычислить площадь и периметр. Из получившихся элементов сформировать массив, в котором элементы будут выстроены в порядке убывания. :help: :help: :help: https://www.cyberforum.ru/ turbo-pascal/ thread1105262.html
Turbo Pascal С помощью подпрограммы ввода и вывода вектора ввести и вывести матрицы 5х4 и 3х5 С помощь подпрограммы ввода и вывода вектора ввести и вывести матрицы 5х4 и 3х5 https://www.cyberforum.ru/ turbo-pascal/ thread1105226.html Turbo Pascal Перевести число из десятичной в шестнадцатиричную систему счисления
Используя в подпрограмме массив или строку открытого типа перевести число из десятичной в шестнадцатиричную систему счисления. Помогите изменить программу var a : string; function...
Turbo Pascal Нетипизированные параметры подпрограмм Помогите исправить под нетипизированный параметрvar a : string; function HEX_DEC(x:string):longint; const digits:array of char = ... https://www.cyberforum.ru/ turbo-pascal/ thread1105218.html Turbo Pascal Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число, удовлетворяющее условию: а) число положительное; б) число делится нацело на 6 и больше 60 https://www.cyberforum.ru/ turbo-pascal/ thread1105212.html
Вывести на экран сумму нечетных чисел от 11 до 19 Turbo Pascal
Используя цикл с предусловием, напишите программу, выводящую на экран сумму нечетных чисел от 11 до 19.
Turbo Pascal Напишите программу, которая вычисляет сумму первых n членов ряда Напишите программу, которая вычисляет сумму первых n членов ряда https://www.cyberforum.ru/ turbo-pascal/ thread1105196.html
Почетный модератор
64287 / 47586 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
25.02.2014, 19:45 0

Составить программу для вычисления значения функции y=ln(1+x) разложением функции в степенной ряд - Turbo Pascal - Ответ 5829066

25.02.2014, 19:45. Показов 7926. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено SatanaXIII как решение

Решение

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
uses crt;
var x,e,t,s:real;
    n:integer;
begin
clrscr;
repeat
write('|x|<1 x=');
readln(x);
until abs(x)<1;
repeat
write('e [10^-6..10^-4] e=');
readln(e);
until(e>=0.000001)and(e<=0.0001);
n:=1;
t:=x;
s:=t;
while abs(t)/n>e do
 begin
  n:=n+1;
  t:=-t*x;
  s:=s+t/n;
 end;
writeln('S=',s:0:6);
write('ln(1+x)=',ln(1+x):0:6);
readln
end.


Вернуться к обсуждению:
Составить программу для вычисления значения функции y=ln(1+x) разложением функции в степенной ряд Turbo Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.02.2014, 19:45
Готовые ответы и решения:

Программа для вычисления значения функции f (x) ее разложением в ряд Макларена: прокомментировать код
{Программа для вычисления значения функции f(x) ее разложением в ряд Макларена} объясните что да...

Составить программу вычисления значения функции, разложенной в ряд
Составить программу вычисления значения функции, разложенной в ряд (сумму ряда). В формулах –...

Рекурсия: вычисление функции sin разложением в степенной ряд
Помогите пожалуйста написать программу обрабатывающую данные рекурсивным способом которая вычисляет...

Составить программу вычисления значения функции, разложенной в ряд (сумму ряда). В формулах – заданная степе
Подскажите в чем ошибка, исправьте пожалуйста, если можно var F,x,S,eps,Fact:real; ...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.02.2014, 19:45
Помогаю со студенческими работами здесь

Составить программу для вычисления значения функции
Помогите с решением задач 1 задача. Составить программу для вычисления значения функции...

Составить программу, для вычисления значения функции
F={sinX,при 0.2&lt;X&lt;0.9 25, в противном случае

Составить программу для вычисления значения функции
Составить программу для вычисления значения функции f(x)=1/2*ctg*x/4+4 На отрезке с шагом h....

Составить программу для вычисления значения функции
Составить программу для вычисления значения функции f(х). Если х&lt;r, то f=|х| иначе если х&gt;=r, то...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru